aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--src/base/UPlaylist.pas3
1 files changed, 3 insertions, 0 deletions
diff --git a/src/base/UPlaylist.pas b/src/base/UPlaylist.pas
index 188b02a6..f12e06cf 100644
--- a/src/base/UPlaylist.pas
+++ b/src/base/UPlaylist.pas
@@ -343,6 +343,9 @@ begin
end;
Playlists[Result].Name := Name;
+ // clear playlist items
+ SetLength(Playlists[Result].Items, 0);
+
I := 1;
PlaylistFile := PlaylistPath.Append(Name + '.upl');
while (PlaylistFile.Exists) do