aboutsummaryrefslogtreecommitdiffhomepage
diff options
context:
space:
mode:
-rw-r--r--playlist.lisp3
1 files changed, 0 insertions, 3 deletions
diff --git a/playlist.lisp b/playlist.lisp
index e8f9c57..3fad639 100644
--- a/playlist.lisp
+++ b/playlist.lisp
@@ -191,7 +191,6 @@
(when (delete-track-at (playlist curctl) pos)
(delete-zipped-playlist curctl)
(for-playlist-viewers container ctl
- (destroy (pl-zip ctl))
(let ((track-ctl (nth pos (tracks ctl))))
(destroy (container track-ctl))
(setf (tracks ctl) (delete track-ctl (tracks ctl))
@@ -203,7 +202,6 @@
(when (swap-tracks (playlist curctl) pos (1+ pos))
(delete-zipped-playlist curctl)
(for-playlist-viewers (container track-ctl) ctl
- (destroy (pl-zip ctl))
(let* ((cur
(nth pos (tracks ctl)))
(next
@@ -220,7 +218,6 @@
(when (swap-tracks (playlist curctl) pos (1- pos))
(delete-zipped-playlist curctl)
(for-playlist-viewers (container track-ctl) ctl
- (destroy (pl-zip ctl))
(let* ((cur
(nth pos (tracks ctl)))
(next