aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorjaybinks <jaybinks@b956fd51-792f-4845-bead-9b4dfca2ff2c>2007-11-02 07:15:11 +0000
committerjaybinks <jaybinks@b956fd51-792f-4845-bead-9b4dfca2ff2c>2007-11-02 07:15:11 +0000
commitfd6d416f75bc316dca4356b5b8e5c7e317d1f156 (patch)
treefb81e38778495a9dbd57b848bc15170dd98356c2
parent9d7f4c06634799c4582b2908673b55ea9fe96e61 (diff)
downloadusdx-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.pas4
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;