From 8dfe55e39e0e41adcbf95f8fae6c2f8e1d06d4b6 Mon Sep 17 00:00:00 2001
From: Jonas Maebe <jonas@freepascal.org>
Date: Fri, 7 Oct 2005 09:34:59 +0000
Subject: [PATCH] Merged revisions 1308 via svnmerge from /trunk

git-svn-id: branches/fixes_2_0@1309 -
---
 rtl/darwin/termiosproc.inc  | 2 +-
 rtl/freebsd/termiosproc.inc | 2 +-
 rtl/netbsd/termiosproc.inc  | 2 +-
 rtl/openbsd/termiosproc.inc | 2 +-
 4 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/rtl/darwin/termiosproc.inc b/rtl/darwin/termiosproc.inc
index fec945b33e..bd4a376392 100644
--- a/rtl/darwin/termiosproc.inc
+++ b/rtl/darwin/termiosproc.inc
@@ -121,7 +121,7 @@ Function IsATTY (Handle:cint):cint;
 var
   t : Termios;
 begin
- IsAtty:=TCGetAttr(Handle,t);
+ IsAtty:=ord(TCGetAttr(Handle,t) <> -1);
 end;
 
 
diff --git a/rtl/freebsd/termiosproc.inc b/rtl/freebsd/termiosproc.inc
index 36bd3b60b1..bf1ed43c89 100644
--- a/rtl/freebsd/termiosproc.inc
+++ b/rtl/freebsd/termiosproc.inc
@@ -117,7 +117,7 @@ Function IsATTY (Handle:cint):cint;
 var
   t : Termios;
 begin
- IsAtty:=TCGetAttr(Handle,t);
+ IsAtty:=ord(TCGetAttr(Handle,t) <> -1);
 end;
 
 
diff --git a/rtl/netbsd/termiosproc.inc b/rtl/netbsd/termiosproc.inc
index ace80f1d81..413a7e8c6a 100644
--- a/rtl/netbsd/termiosproc.inc
+++ b/rtl/netbsd/termiosproc.inc
@@ -117,7 +117,7 @@ Function IsATTY (Handle:cint):cint;
 var
   t : Termios;
 begin
- IsAtty:=TCGetAttr(Handle,t);
+ IsAtty:=ord(TCGetAttr(Handle,t) <> -1);
 end;
 
 
diff --git a/rtl/openbsd/termiosproc.inc b/rtl/openbsd/termiosproc.inc
index 740e858eb3..802daee27a 100644
--- a/rtl/openbsd/termiosproc.inc
+++ b/rtl/openbsd/termiosproc.inc
@@ -117,7 +117,7 @@ Function IsATTY (Handle:cint):cint;
 var
   t : Termios;
 begin
- IsAtty:=TCGetAttr(Handle,t);
+ IsAtty:=ord(TCGetAttr(Handle,t) <> -1);
 end;