Преглед изворни кода

pastojs: fixed compile on Windows

git-svn-id: trunk@38048 -
Mattias Gaertner пре 7 година
родитељ
комит
ae5e851f7f
1 измењених фајлова са 2 додато и 2 уклоњено
  1. 2 2
      packages/pastojs/src/pas2jsfilecache.pp

+ 2 - 2
packages/pastojs/src/pas2jsfilecache.pp

@@ -1391,10 +1391,10 @@ begin
 end;
 
 function TPas2jsFileResolver.SearchLowUpCase(var Filename: string): boolean;
-{$IFNDEF CaseInsensitiveFilenames}
 var
-  CasedFilename: String;
   i: Integer;
+{$IFNDEF CaseInsensitiveFilenames}
+  CasedFilename: String;
 {$ENDIF}
 begin
   if StrictFileCase or Cache.SearchLikeFPC then