aboutsummaryrefslogtreecommitdiffstats
path: root/Game/Code/Classes/USongs.pas
diff options
context:
space:
mode:
Diffstat (limited to 'Game/Code/Classes/USongs.pas')
-rw-r--r--Game/Code/Classes/USongs.pas8
1 files changed, 4 insertions, 4 deletions
diff --git a/Game/Code/Classes/USongs.pas b/Game/Code/Classes/USongs.pas
index 2c8e3587..710cd44f 100644
--- a/Game/Code/Classes/USongs.pas
+++ b/Game/Code/Classes/USongs.pas
@@ -195,6 +195,8 @@ begin
end;
procedure TSongs.int_LoadSongList;
+var
+ I: integer;
begin
try
fProcessing := true;
@@ -202,10 +204,8 @@ begin
Log.LogStatus('Searching For Songs', 'SongList');
// browse directories
- BrowseDir(SongPath);
-
- if UserSongPath <> SongPath then
- BrowseDir(UserSongPath);
+ for I := 0 to SongPaths.Count-1 do
+ BrowseDir(SongPaths[I]);
if assigned( CatSongs ) then
CatSongs.Refresh;