dbo/.emacs.d
dbo
/
.emacs.d
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

[Music] Add simple function to play files from git-annex-find call

This commit is contained in:
Daniel - 2019-06-10 16:27:28 +02:00
parent b6414e118d
commit 952e6f1c95
No known key found for this signature in database
GPG Key ID: 1C7071A75BB72D64
2 changed files with 11 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
init.el
View File

@ -2152,6 +2152,7 @@ search commands like `db/helm-shortcuts’."
:commands (db/play-auto-playlist
db/playlist-files-from-cache
db/playlist-files-from-git-annex-find
db/play-auto-playlist-from-git-annex-find
db/update-playlist-cache-from-directory))

10
site-lisp/db-music.el
View File

@ -132,6 +132,16 @@ part of a git-annex repository, and will complain otherwise."
(expand-file-name
path
emms-source-file-default-directory))))))
(defun db/play-auto-playlist-from-git-annex-find ()
"Interactively query user for a git-annex match expression and
play resulting list of audio files.
See `db/playlist-files-from-git-annex-find’ for more details."
(interactive)
(db/-emms-playlist-from-files
(call-interactively #'db/playlist-files-from-git-annex-find)))
(provide 'db-music)
;;; db-music ends here