emms.el (with-current-emms-playlist): Also recreate when the buffer is

dead.

darcs-hash:20050912105908-2189f-9511f1b22cef47e3a6b6aa4ab3ad2bc0ba08c03d.gz

1 files changed, 6 insertions, 3 deletions

diff --git a/emms.el b/emms.el
index 7fd380c..95da141 100644
--- a/emms.el
+++ b/emms.el
@@ -348,7 +348,8 @@ used, and the contents removed."
 (defmacro with-current-emms-playlist (&rest body)
   "Run BODY with the current buffer being the current playlist buffer."
   `(progn
-     (when (not emms-playlist-buffer)
+     (when (or (not emms-playlist-buffer)
+               (not (buffer-live-p emms-playlist-buffer)))
        (emms-playlist-clear))
      (with-current-buffer emms-playlist-buffer
        ,@body)))
@@ -534,15 +535,17 @@ This uses `emms-playlist-insert-track-function'."
       (apply source args)
       (run-hooks emms-playlist-source-inserted-hook))))
 
+;;; FIXME!
 (defun emms-playlist-shuffle (&optional beg end)
   "Shuffle the playlist between BEG and END."
-  ...)
+  nil)
 
+;;; FIXME!
 (defun emms-playlist-sort (&optional beg end)
   "Sort the playlist between BEG and END.
 This uses `emms-sort-lessp-function'."
   ;; That exists!
-  ...)
+  nil)