phundrak/dotfiles
1
0
Fork 0
Code Issues Pull Requests Activity

[Emacs] Update hydra-media appearance

Browse Source
This commit is contained in:
Lucien Cartier-Tilet 2021-12-12 15:03:36 +01:00
parent 153d7bc9a9
commit 5a5725fec9
Signed by: phundrak
GPG Key ID: BD7789E705CB8DCA
1 changed files with 6 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
org/config/emacs.org
View File

@ -2221,14 +2221,13 @@ minibuffer, both separated by a single space."
(string-trim (string-trim
(shell-command-to-string "mpc volume"))))))) (shell-command-to-string "mpc volume")))))))
(defhydra hydra-media () (defhydra hydra-media (:hint nil)
" "
^Tracks^ ^Volume^ ^Other^ %s(all-the-icons-material \"volume_up\" :height 1.0 :v-adjust -0.2)
^^^^^^^^---------------------------- [_s_]
[_c_] %s(all-the-icons-material \"skip_previous\" :height 1.0 :v-adjust -0.2) [_t_] %s(all-the-icons-material \"volume_down\" :height 1.0 :v-adjust -0.2) [_p_] %s(all-the-icons-material \"play_arrow\" :height 1.0 :v-adjust -0.2) « [_c_] _p_ [_r_] » [_S_] %s(all-the-icons-material \"stop\")
[_r_] %s(all-the-icons-material \"skip_next\" :height 1.0 :v-adjust -0.2) [_s_] %s(all-the-icons-material \"volume_up\" :height 1.0 :v-adjust -0.2) [_S_] %s(all-the-icons-material \"stop\" :height 1.0 :v-adjust -0.2) [_t_]
%s(all-the-icons-material \"volume_down\" :height 1.0 :v-adjust -0.2)
[_q_] quit
" "
("c" emms-player-mpd-previous) ("c" emms-player-mpd-previous)
("r" emms-player-mpd-next) ("r" emms-player-mpd-next)