diff options
author | tobigun <tobigun@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2008-08-08 11:43:41 +0000 |
---|---|---|
committer | tobigun <tobigun@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2008-08-08 11:43:41 +0000 |
commit | a4de5895a4cb1c3bf06948c27af50b6d27de306e (patch) | |
tree | 098c336cf4ec45d52f4b09d7f57978e4cd2d6f26 /Game/Code/Classes/UPlaylist.pas | |
parent | 887199a1ed8727b1968dd4cfe11c3c7311f3f311 (diff) | |
download | usdx-a4de5895a4cb1c3bf06948c27af50b6d27de306e.tar.gz usdx-a4de5895a4cb1c3bf06948c27af50b6d27de306e.tar.xz usdx-a4de5895a4cb1c3bf06948c27af50b6d27de306e.zip |
somw warnings removed
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@1231 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to 'Game/Code/Classes/UPlaylist.pas')
-rw-r--r-- | Game/Code/Classes/UPlaylist.pas | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Game/Code/Classes/UPlaylist.pas b/Game/Code/Classes/UPlaylist.pas index a08f33ec..c867c356 100644 --- a/Game/Code/Classes/UPlaylist.pas +++ b/Game/Code/Classes/UPlaylist.pas @@ -468,6 +468,8 @@ var P: Integer; I: Integer; begin + Result := -1; + if iPlaylist = -1 then P := CurPlaylist else if (iPlaylist >= 0) AND (iPlaylist <= high(Playlists)) then @@ -475,8 +477,6 @@ begin else exit; - Result := -1; - For I := 0 to high(Playlists[P].Items) do begin if (Playlists[P].Items[I].SongID = Int(SongID)) then |