diff options
author | jaybinks <jaybinks@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2007-11-02 07:15:11 +0000 |
---|---|---|
committer | jaybinks <jaybinks@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2007-11-02 07:15:11 +0000 |
commit | fd6d416f75bc316dca4356b5b8e5c7e317d1f156 (patch) | |
tree | fb81e38778495a9dbd57b848bc15170dd98356c2 | |
parent | 9d7f4c06634799c4582b2908673b55ea9fe96e61 (diff) | |
download | usdx-fd6d416f75bc316dca4356b5b8e5c7e317d1f156.tar.gz usdx-fd6d416f75bc316dca4356b5b8e5c7e317d1f156.tar.xz usdx-fd6d416f75bc316dca4356b5b8e5c7e317d1f156.zip |
fix bad build#USDX-DELPHI-99
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@550 b956fd51-792f-4845-bead-9b4dfca2ff2c
-rw-r--r-- | Game/Code/Classes/USongs.pas | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/Game/Code/Classes/USongs.pas b/Game/Code/Classes/USongs.pas index e3b2f3b2..6a58a8dd 100644 --- a/Game/Code/Classes/USongs.pas +++ b/Game/Code/Classes/USongs.pas @@ -187,14 +187,15 @@ begin end; procedure TSongs.Execute(); +(* var - lrfds : fdSet; time : Ttimeval; res : integer; buf : pchar; len, bufflen : longint; str : String; +*) begin fParseSongDirectory := true; @@ -218,6 +219,7 @@ begin fProcessing := true; Log.LogError('SongList', 'Searching For Songs'); + Setlength(Song, 50); BrowsePos := 0; |