Browse Source

* hasunix fix for beos

marco 22 years ago
parent
commit
f8ee58a3f2
1 changed files with 5 additions and 2 deletions
  1. 5 2
      rtl/objpas/fina.inc

+ 5 - 2
rtl/objpas/fina.inc

@@ -95,7 +95,7 @@ Var S : String;
 Begin
  S:=FileName;
  DoDirSeparators(S);
-{$ifdef Unix}
+{$ifdef HasUnix}
   Result:=Unix.fexpand(S);
 {$else}
   Result:=Dos.Fexpand(S);
@@ -232,7 +232,10 @@ end;
 
 {
   $Log$
-  Revision 1.8  2002-10-22 21:57:54  michael
+  Revision 1.9  2003-01-10 21:02:13  marco
+   * hasunix fix for beos
+
+  Revision 1.8  2002/10/22 21:57:54  michael
   + Added some missing path functions
 
   Revision 1.7  2002/10/12 15:34:09  michael