jdormit/dotfiles
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Make vuiet hydra sexy

Browse Source
This commit is contained in:
Jeremy Dormitzer 2020-04-01 14:15:49 -04:00
parent 7cc8934e21
commit f9ee146c9b
1 changed files with 27 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

37
emacs/init.org
View File

@ -5777,16 +5777,7 @@ A music browser and player:
(jdormit/define-prefix "av" "vuiet")
(jdormit/define-prefix "avp" "player")
(jdormit/define-prefix "avb" "browser")
(defhydra hydra-vuiet (:hint nil)
"
Player
^^^^^^------------------------
_s_top | _p_lay/pause | _n_ext
"
("s" vuiet-stop :color blue)
("p" vuiet-play-pause)
("n" vuiet-next)
("q" nil "quit" :color blue))
:config
(advice-add 'vuiet-update-mode-line :around
(lambda (oldfn &rest args)
@ -5815,3 +5806,29 @@ A music browser and player:
(vuiet-interactive-map "l" #'vuiet-play-loved-tracks)
(vuiet-interactive-map "L" #'vuiet-play-loved-tracks-similar))
#+END_SRC
And a handy hydra for it:
#+BEGIN_SRC emacs-lisp
(defhydra hydra-vuiet (:hint nil)
"
--- ^^ ^^ ^^ ^^ ---
+------------------/ / ^^ ^^ ^^ ^^+------------------/ /
| - ------- / / ^^ ^^ ^^ ^^| - ------- / /
|(-) .d########b. //)|+------------^^----------------^^------------^^-----+^^|(-) .d########b. //)|
| .d############// || ^^ ^^ ^^ |^^| .d############// |
| .d######''####//b. || ^^ ^^ ^^ |^^| .d######''####//b. |
| 9######( )#-//##P || ^^ ^^ ^^ |^^| 9######( )#-//##P |
| 'b######++#/-/##d' || ^^ ^^ ^^ |^^| 'b######++#/-/##d' |
| '9############P' || ^^ ^^ ^^ |^^| '9############P' |
| -'9a#######aP' || +---------^^+---------------^^--+---------^^--+ |^^| -'9a#######aP' |
| |-| `'''''' || | _s_top | _p_lay/pause | _n_ext | |^^| |-| `'''''' |
| ---..----------- || +---------^^+---------------^^--+---------^^--+ |^^| ---..----------- |
| |---||-----------| |+------------^^----------------^^------------^^-----+^^| |---||-----------| |
| | ^^ ^^ ^^ ^^| |
+--------------------+ [_q_]uit ^^ ^^ ^^ +--------------------+
"
("s" vuiet-stop :color blue)
("p" vuiet-play-pause)
("n" vuiet-next)
("q" nil :color blue))
#+END_SRC