Hi,
Oops, just rediscovered this thread. The replies must have got stuck
somewhere on my end.
Anyway, the attached patch, which replicates your change here[1] but
for emms-source-playlist.el, fixes the annoyances I was having.
Thanks for your work on EMMS. It's got me in the pleasant habit of
listening to music while working!
--- emms-source-playlist.el1 2019-01-31 00:47:32.000000000 +0000
+++ emms-source-playlist.el2 2019-01-31 00:48:44.981736000 +0000
@@ -174,8 +174,7 @@
(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 @@
(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 @@
(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 @@
(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 @@
(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))))
Footnotes:
[1]
http://git.savannah.gnu.org/cgit/emms.git/commit/?id=728114cc41bf56fe7f442df48366a66e209e5528
--
Jordan Wilson
Sent from Gnus v5.13, GNU Emacs 26.1
_______________________________________________
Emms-help mailing list
[email protected]
https://lists.gnu.org/mailman/listinfo/emms-help
