- Support for multiple song/cover paths.

- Add multiple Song-Paths to the Ini file:
[Directories]
SongDir1=C:\...
SongDir2=D:\...
SongDirA=D:\...
- UIni.pas clean-up

git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@1266 b956fd51-792f-4845-bead-9b4dfca2ff2c

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;