[Music] Allow for customizing automatic playlist function
This commit is contained in:
parent
ff06cddaba
commit
9b48edd77f
8
init.el
8
init.el
|
@ -2145,9 +2145,15 @@ search commands like `db/helm-shortcuts’."
|
||||||
(require 'helm-adaptive)))
|
(require 'helm-adaptive)))
|
||||||
|
|
||||||
(use-package db-music
|
(use-package db-music
|
||||||
:commands (db/play-playlist
|
:commands (db/play-playlist-from-cache
|
||||||
|
db/play-playlist-from-git-annex-tag
|
||||||
db/update-playlist-from-directory))
|
db/update-playlist-from-directory))
|
||||||
|
|
||||||
|
(defcustom db/playlist-play-function #'db/play-playlist-from-cache
|
||||||
|
"Function to use to automatically generate playlists"
|
||||||
|
:group 'personal-settings
|
||||||
|
:type 'function)
|
||||||
|
|
||||||
(defcustom db/playlist nil
|
(defcustom db/playlist nil
|
||||||
"List of songs to include in a random playlist."
|
"List of songs to include in a random playlist."
|
||||||
:group 'personal-settings
|
:group 'personal-settings
|
||||||
|
|
|
@ -6,7 +6,7 @@
|
||||||
|
|
||||||
(require 'emms)
|
(require 'emms)
|
||||||
|
|
||||||
(defun db/play-playlist ()
|
(defun db/play-playlist-from-cache ()
|
||||||
"Start playing songs from `db/playlist’"
|
"Start playing songs from `db/playlist’"
|
||||||
(interactive)
|
(interactive)
|
||||||
(save-window-excursion
|
(save-window-excursion
|
||||||
|
|
Loading…
Reference in New Issue