commit e8e7c9784a917198019945682e4f89f783197df8 parent 802bf546c93c8cf8eb6f2bcd6e8ab9b2bbcf22b7 Author: Vincent Demeester <vincent@sbr.pm> Date: Thu, 8 Jul 2021 19:23:05 +0200 tools/emacs: start configuring bongo 🎼 Set a default directory for library, some keybindings from inside emacs, and other relatively sane defaults. Signed-off-by: Vincent Demeester <vincent@sbr.pm> Diffstat:
M | tools/emacs/config/config-music.el | | | 30 | +++++++++++++++++++++++++++--- |
1 file changed, 27 insertions(+), 3 deletions(-)
diff --git a/tools/emacs/config/config-music.el b/tools/emacs/config/config-music.el @@ -5,11 +5,35 @@ (use-package bongo :commands (bongo bongo-show) + :bind (("C-c x b" . bongo) + ("<C-XF86AudioPlay>" . bongo-pause/resume) + ("<C-XF86AudioNext>" . bongo-next) + ("<C-XF86AudioPrev>" . bongo-previous) + ("<M-XF86AudioPlay>" . bongo-show) + ("<S-XF86AudioNext>" . bongo-seek-forward-10) + ("<S-XF86AudioPrev>" . bongo-seek-backward-10)) :config - (setq-default bongo-audio-file-name-extensions '("669" "aac" "amf" "apun" "au" "dsm" "far" "flac" "g18" "g36" "gdm" "imf" "it" "mdz" "med" "mid" "midi" "mka" "mod" "m4a" "mp2" "mp3" "mtm" "ogg" "okt" "r36" "ra" "rcp" "rmi" "s3m" "spx" "stm" "stx" "ult" "umx" "uni" "vqf" "wav" "wma" "xm")) - (setq-default bongo-custom-backend-matchers + (setq-default bongo-audio-file-name-extensions + '("669" "aac" "amf" "apun" "au" "dsm" "far" "flac" "g18" "g36" "gdm" + "imf" "it" "mdz" "med" "mid" "midi" "mka" "mod" "m4a" "mp2" "mp3" + "mtm" "ogg" "okt" "r36" "ra" "rcp" "rmi" "s3m" "spx" "stm" "stx" + "ult" "umx" "uni" "vqf" "wav" "wma" "xm") + bongo-custom-backend-matchers '((mpv local-file "m4a") - (mpv local-file "opus")))) + (mpv local-file "opus")) + bongo-default-directory "/net/sakhalin.home/export/gaia/music" + bongo-prefer-library-buffers nil + bongo-insert-whole-directory-trees t + bongo-logo nil + bongo-display-track-icons nil + bongo-display-track-lengths nil + bongo-display-header-icons nil + bongo-display-playback-mode-indicator t + bongo-display-inline-playback-progress nil + bongo-join-inserted-tracks nil + bongo-field-separator (propertize " · " 'face 'shadow)) + (bongo-mode-line-indicator-mode -1) + (bongo-header-line-mode -1)) (provide 'config-music) ;;; config-music ends here