aboutsummaryrefslogtreecommitdiffstats
path: root/unicode
diff options
context:
space:
mode:
Diffstat (limited to 'unicode')
-rw-r--r--unicode/src/base/UIni.pas5
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;