aboutsummaryrefslogtreecommitdiffstats
path: root/Game/Code/Classes/UPlaylist.pas
diff options
context:
space:
mode:
Diffstat (limited to 'Game/Code/Classes/UPlaylist.pas')
-rw-r--r--Game/Code/Classes/UPlaylist.pas4
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