瀏覽代碼

Amiga: fixed FileNameCasePreserving flag to true

git-svn-id: trunk@28440 -
Károly Balogh 11 年之前
父節點
當前提交
b5d559dce1
共有 1 個文件被更改,包括 1 次插入1 次删除
  1. 1 1
      rtl/amiga/system.pp

+ 1 - 1
rtl/amiga/system.pp

@@ -50,7 +50,7 @@ const
   StdErrorHandle  : LongInt = 0;
   StdErrorHandle  : LongInt = 0;
 
 
   FileNameCaseSensitive : Boolean = False;
   FileNameCaseSensitive : Boolean = False;
-  FileNameCasePreserving: boolean = false;
+  FileNameCasePreserving: boolean = True;
   CtrlZMarksEOF: boolean = false; (* #26 not considered as end of file *)
   CtrlZMarksEOF: boolean = false; (* #26 not considered as end of file *)
 
 
   sLineBreak = LineEnding;
   sLineBreak = LineEnding;