summaryrefslogtreecommitdiff
path: root/ide
diff options
context:
space:
mode:
authormarco <marco@3ad0048d-3df7-0310-abae-a5850022a9f2>2010-12-22 21:20:51 +0000
committermarco <marco@3ad0048d-3df7-0310-abae-a5850022a9f2>2010-12-22 21:20:51 +0000
commit3589752955b2b36c31fa3bdd7a72637c7ab19cb6 (patch)
treedcfbb61f32302be9724980d9ea57108111ed4f83 /ide
parent959c1b7acb1b04136ed0d6cdb116a25b3f6aceaa (diff)
downloadfpc-3589752955b2b36c31fa3bdd7a72637c7ab19cb6.tar.gz
* fix for 10758, additional terminal type checked (udev)
git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@16616 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'ide')
-rw-r--r--ide/fpusrscr.pas2
1 files changed, 1 insertions, 1 deletions
diff --git a/ide/fpusrscr.pas b/ide/fpusrscr.pas
index b2702b25f4..92e03b9f36 100644
--- a/ide/fpusrscr.pas
+++ b/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' :