From db9d9ffe0185ecfe09c2f10a70ee6dedcaad769f Mon Sep 17 00:00:00 2001
From: daniel <daniel@freepascal.org>
Date: Fri, 9 Jul 2004 20:21:20 +0000
Subject: [PATCH]   * Fix compilation for now

---
 rtl/freebsd/console.pp | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/rtl/freebsd/console.pp b/rtl/freebsd/console.pp
index c686c14662..dfe4692b8c 100644
--- a/rtl/freebsd/console.pp
+++ b/rtl/freebsd/console.pp
@@ -1830,7 +1830,7 @@ function physicalconsole(fd:longint) : boolean;
 var name:string;
 
 begin
- if (isatty(fd)<>-1) then
+ if isatty(fd) then
   begin
    name:=ttyname(fd);
    if Copy(name,1,8)<>'/dev/tty' then
@@ -3476,7 +3476,10 @@ end.
 
 {
   $Log$
-  Revision 1.8  2004-01-03 12:18:29  marco
+  Revision 1.9  2004-07-09 20:21:20  daniel
+    * Fix compilation for now
+
+  Revision 1.8  2004/01/03 12:18:29  marco
    * a lot of copyright notices and CVS logs added and fixed