aboutsummaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
Diffstat (limited to 'lisp')
-rw-r--r--lisp/emms-source-playlist.el15
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))))