|
@@ -155,7 +155,8 @@ begin
|
|
|
NoPath:=false; {Skip lowercasing path: 'X11'<>'x11' }
|
|
|
end;
|
|
|
'A'..'Z' : if NoPath then
|
|
|
- FixFileName[i]:=AnsiChar(byte(s[i])+ord('a')-ord('A'))
|
|
|
+ {FixFileName[i]:=char(byte(s[i])+ord('a')-ord('A'))}
|
|
|
+ FixFileName[i]:=s[i] {leave case as is, not sure why lowercasing to begin with}
|
|
|
else
|
|
|
FixFileName[i]:=s[i];
|
|
|
{$else}
|