diff options
| -rw-r--r-- | src/base/UPlaylist.pas | 3 |
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 |