trying to add emms stuff

This commit is contained in:
Chris Cochrun 2023-12-06 15:52:57 -06:00
parent 73ca11bef7
commit d89efbbd99
2 changed files with 24 additions and 0 deletions

View file

@ -4703,6 +4703,18 @@ Since Bongo seems kinda difficult I shall give EMMS another try.
(emms-browser-remove-tracks t)
(emms-browser-remove-tracks)))
(defun chris/emms-mpv-video-playlist ()
"Create a playlist for mpv videos."
(interactive)
(emms-playlist-new "*emms-videos*"))
(defun chris/emms-add-video (&optional video)
"adds the given video to the emms playlist"
(interactive)
(if video
(emms-add-url video)
(emms-add-url)))
:general
(chris/leader-keys
:states 'normal

12
init.el
View file

@ -3476,6 +3476,18 @@ interfere with the default `bongo-playlist-buffer'."
(emms-browser-remove-tracks t)
(emms-browser-remove-tracks)))
(defun chris/emms-mpv-video-playlist ()
"Create a playlist for mpv videos."
(interactive)
(emms-playlist-new "*emms-videos*"))
(defun chris/emms-add-video (&optional video)
"adds the given video to the emms playlist"
(interactive)
(if video
(emms-add-url video)
(emms-add-url)))
:general
(chris/leader-keys
:states 'normal