diff options
| -rw-r--r-- | lisp/emms-source-playlist.el | 15 | 
1 files changed, 5 insertions, 10 deletions
diff --git a/lisp/emms-source-playlist.el b/lisp/emms-source-playlist.el index eadd4b7..9536937 100644 --- a/lisp/emms-source-playlist.el +++ b/lisp/emms-source-playlist.el @@ -174,8 +174,7 @@ See `emms-source-playlist-formats' for a list of supported formats."    (interactive (list (read-file-name "Playlist file: "                                       emms-source-file-default-directory                                       emms-source-file-default-directory -                                     t -                                     (thing-at-point 'filename)))) +                                     t)))    (mapc #'emms-playlist-insert-track          (with-temp-buffer            (emms-insert-file-contents file) @@ -232,8 +231,7 @@ OUT should be the buffer where tracks are stored in the native EMMS format."    (interactive (list (read-file-name "Playlist file: "                                       emms-source-file-default-directory                                       emms-source-file-default-directory -                                     t -                                     (thing-at-point 'filename)))) +                                     t)))    (mapc #'emms-playlist-insert-track          (with-temp-buffer            (emms-insert-file-contents file) @@ -306,8 +304,7 @@ OUT should be the buffer where tracks are stored in m3u format."    (interactive (list (read-file-name "Playlist file: "                                       emms-source-file-default-directory                                       emms-source-file-default-directory -                                     t -                                     (thing-at-point 'filename)))) +                                     t)))    (mapc #'emms-playlist-insert-track          (with-temp-buffer            (emms-insert-file-contents file) @@ -392,8 +389,7 @@ OUT should be the buffer where tracks are stored in pls format."    (interactive (list (read-file-name "Playlist file: "                                       emms-source-file-default-directory                                       emms-source-file-default-directory -                                     t -                                     (thing-at-point 'filename)))) +                                     t)))    (mapc #'emms-playlist-insert-track          (with-temp-buffer            (emms-insert-file-contents file) @@ -441,8 +437,7 @@ See `emms-source-playlist-formats' for a list of supported formats."    (interactive (list (read-file-name "Playlist file: "                                       emms-source-file-default-directory                                       emms-source-file-default-directory -                                     t -				     (thing-at-point 'filename)))) +                                     t)))    (emms-playlist-insert-track     (emms-track 'playlist (expand-file-name file))))  | 
