X-Git-Url: https://www.fleuret.org/cgi-bin/gitweb/gitweb.cgi?a=blobdiff_plain;f=media.el;h=2e60e47f01dfe8ebf51cda62b8363d41d30e2789;hb=3da5ade3d4bd21fedebcdc517508e1bd022aa9a4;hp=ebddca7cf077568d03a8daab70d8f61801e3321a;hpb=39e92d671d875284f2aaa5f9133959ad5103fb86;p=elisp.git

diff --git a/media.el b/media.el
index ebddca7..2e60e47 100644
--- a/media.el
+++ b/media.el
@@ -109,7 +109,7 @@ title to display in the list (convenient for internet radios)."
   :group 'media)
 
 (defcustom media/expert nil
-  "Should the keymap help be shown?"
+  "Should we bypass the keymap help when starting"
   :type 'boolean
   :group 'media)
 
@@ -666,8 +666,7 @@ returns nil if no id3 tags could be found."
               (push (cons url (cons title time)) (cdr (assoc playlist list)))
               )))))
 
-    (save-excursion
-      (set-buffer (find-file-noselect media/playlist-file))
+    (with-current-buffer (find-file-noselect media/playlist-file)
       (erase-buffer)
       (mapc (lambda (x)
               (insert "PLAYLIST:" (car x) "\n")