Browse Source

* use directory separator from System unit

git-svn-id: trunk@12794 -
Károly Balogh 16 years ago
parent
commit
d800d165de
1 changed files with 2 additions and 2 deletions
  1. 2 2
      ide/fputils.pas

+ 2 - 2
ide/fputils.pas

@@ -19,14 +19,14 @@ interface
 uses Objects;
 uses Objects;
 
 
 const
 const
+  dirsep = System.DirectorySeparator;
+  
 {$ifdef Unix}
 {$ifdef Unix}
-  dirsep = '/';
   listsep = [';',':'];
   listsep = [';',':'];
   exeext = '';
   exeext = '';
   pasext = '.pas';
   pasext = '.pas';
   ppext  = '.pp';
   ppext  = '.pp';
 {$else}
 {$else}
-  dirsep = '\';
   listsep = [';'];
   listsep = [';'];
   exeext = '.exe';
   exeext = '.exe';
   pasext = '.pas';
   pasext = '.pas';