|
@@ -753,7 +753,7 @@ begin
|
|
|
if Not IsXterm and (IsATTY(stdinputhandle)<>-1) then
|
|
if Not IsXterm and (IsATTY(stdinputhandle)<>-1) then
|
|
|
begin
|
|
begin
|
|
|
Console:=TTyNetwork; {Default: Network or other vtxxx tty}
|
|
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
|
|
begin
|
|
|
Case ThisTTY[9] of
|
|
Case ThisTTY[9] of
|
|
|
'0'..'9' :
|
|
'0'..'9' :
|
marco