22 lines
629 B
EmacsLisp
22 lines
629 B
EmacsLisp
(setq emms-player-list '(emms-player-mpv)
|
|
emms-info-functions '(emms-info-native)
|
|
emms-source-file-default-directory "~/Music"
|
|
emms-lyrics-dir "~/Music/lyrics")
|
|
|
|
(when (require 'emms-setup nil :noerror)
|
|
(emms-all)
|
|
(add-hook 'emms-player-started-hook #'emms-show)
|
|
(add-hook 'emms-player-paused-hook #'emms-show)
|
|
(when (require 'hydra nil :noerror)
|
|
(defhydra emms (global-map "C-c e")
|
|
"emms"
|
|
("b" emms-smart-browse)
|
|
("d" emms-show)
|
|
("s" emms-start)
|
|
("S" emms-stop)
|
|
("n" emms-next)
|
|
("p" emms-previous)
|
|
("P" emms-pause))))
|
|
|
|
(provide 'custom-media-config)
|