* fix for 10758, additional terminal type checked (udev)

git-svn-id: trunk@16616 -

ide/fpusrscr.pas

@@ -753,7 +753,7 @@ begin
   if Not IsXterm and (IsATTY(stdinputhandle)<>-1) then
     begin
       Console:=TTyNetwork;  {Default: Network or other vtxxx tty}
-      if (Copy(ThisTTY, 1, 8) = '/dev/tty') and (ThisTTY[9]<>'p') Then
+      if ((Copy(ThisTTY, 1, 8) = '/dev/tty') and (ThisTTY[9]<>'p')) or (Copy(ThisTTY,1,8)='/dev/vc/') Then
         begin
           Case ThisTTY[9] of
             '0'..'9' :