From c2ffb4f80438e865d4223dc421b73082d72b762b Mon Sep 17 00:00:00 2001
From: marco <marco@freepascal.org>
Date: Fri, 14 Nov 2003 21:52:58 +0000
Subject: [PATCH]  * octal() is not necessary anymore. Use &xxx

---
 ide/fpusrscr.pas | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/ide/fpusrscr.pas b/ide/fpusrscr.pas
index 5317b8fa86..6ce35c5ea4 100644
--- a/ide/fpusrscr.pas
+++ b/ide/fpusrscr.pas
@@ -783,7 +783,7 @@ begin
             '0'..'9' :
               begin { running Linux on native console or native-emulation }
                 FName:='/dev/vcsa' + ThisTTY[9];
-                TTYFd:={$ifdef ver1_0}fdOpen{$else}fpOpen{$endif}(FName, Octal(666), Open_RdWr); { open console }
+                TTYFd:={$ifdef ver1_0}fdOpen{$else}fpOpen{$endif}(FName, &666, Open_RdWr); { open console }
                 If TTYFd <>-1 Then
                   Console:=ttyLinux;
               end;
@@ -1441,7 +1441,10 @@ end;
 end.
 {
   $Log$
-  Revision 1.28  2003-09-27 14:03:45  peter
+  Revision 1.29  2003-11-14 21:52:58  marco
+   * octal() is not necessary anymore. Use &xxx
+
+  Revision 1.28  2003/09/27 14:03:45  peter
     * fixed for unix
 
   Revision 1.27  2003/02/04 22:05:56  pierre