diff --git a/init.el b/init.el index d94d3ce..1b829e7 100644 --- a/init.el +++ b/init.el @@ -2145,9 +2145,15 @@ search commands like `db/helm-shortcuts’." (require 'helm-adaptive))) (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)) +(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 "List of songs to include in a random playlist." :group 'personal-settings diff --git a/site-lisp/db-music.el b/site-lisp/db-music.el index d87a880..6746aac 100644 --- a/site-lisp/db-music.el +++ b/site-lisp/db-music.el @@ -6,7 +6,7 @@ (require 'emms) -(defun db/play-playlist () +(defun db/play-playlist-from-cache () "Start playing songs from `db/playlist’" (interactive) (save-window-excursion