diff options
Diffstat (limited to '')
-rw-r--r-- | unicode/src/base/UIni.pas | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/unicode/src/base/UIni.pas b/unicode/src/base/UIni.pas index 2bf49d9d..e90ae31c 100644 --- a/unicode/src/base/UIni.pas +++ b/unicode/src/base/UIni.pas @@ -269,7 +269,8 @@ uses UPlatform, USkins, URecord, - UCommandLine; + UCommandLine, + UUnicodeUtils; (** * Returns the filename without its fileextension @@ -462,7 +463,7 @@ begin // Load song-paths for I := 0 to PathStrings.Count-1 do begin - if (AnsiStartsText('SongDir', PathStrings[I])) then + if (Pos('SONGDIR', UpperCase(PathStrings[I])) = 1) then begin AddSongPath(IniFile.ReadString('Directories', PathStrings[I], '')); end; |