[hydra] change color of kill-buffer to red

This commit is contained in:
contrapunctus 2021-08-01 00:39:55 +05:30
parent 1e6660d73a
commit 4dc09324b3
1 changed files with 9 additions and 9 deletions

View File

@ -1410,7 +1410,7 @@ _u_: next word ^_l_: edit lines^ _s_: next whole symbol
("h" my-help-hydra/body "Help")
("i" (find-file "~/.emacs.d/init.org") "open init")
("I" contrapunctus-info-hydra/body "Info")
("k" (kill-buffer (current-buffer)) "kill")
("k" (kill-buffer (current-buffer)) "kill" :color red)
("N" contrapunctus-line-display-hydra/body "line display")
("o" save-buffer "save")
("Q" toggle-debug-on-quit "tdoq")
@ -1473,7 +1473,7 @@ _u_: next word ^_l_: edit lines^ _s_: next whole symbol
("h" my-help-hydra/body "Help")
("i" (find-file "~/.emacs.d/init.org") "open init")
("I" contrapunctus-info-hydra/body "Info")
("k" (kill-buffer (current-buffer)) "kill")
("k" (kill-buffer (current-buffer)) "kill" :color red)
("N" contrapunctus-line-display-hydra/body "line display")
("o" save-buffer "save")
("Q" toggle-debug-on-quit "tdoq")
@ -1528,7 +1528,7 @@ _u_: next word ^_l_: edit lines^ _s_: next whole symbol
("I" contrapunctus-info-hydra/body "Info")
("E" toggle-debug-on-error "tdoe")
("w" contrapunctus-window-hydra/body "window")
("k" (kill-buffer (current-buffer)) "kill")
("k" (kill-buffer (current-buffer)) "kill" :color red)
("N" contrapunctus-line-display-hydra/body "line display")
("G" contrapunctus-general-hydra/body "up"))
#+END_SRC
@ -1557,7 +1557,7 @@ _u_: next word ^_l_: edit lines^ _s_: next whole symbol
("h" my-help-hydra/body "Help")
("i" (find-file "~/.emacs.d/init.org") "open init")
("I" contrapunctus-info-hydra/body "Info")
("k" (kill-buffer (current-buffer)) "kill")
("k" (kill-buffer (current-buffer)) "kill" :color red)
("N" contrapunctus-line-display-hydra/body "line display")
("o" save-buffer "save")
("Q" toggle-debug-on-quit "tdoq")
@ -1611,7 +1611,7 @@ _u_: next word ^_l_: edit lines^ _s_: next whole symbol
("h" my-help-hydra/body "Help")
("i" (find-file "~/.emacs.d/init.org") "open init")
("I" contrapunctus-info-hydra/body "Info")
("k" (kill-buffer (current-buffer)) "kill")
("k" (kill-buffer (current-buffer)) "kill" :color red)
("N" contrapunctus-line-display-hydra/body "line display")
("o" save-buffer "save")
("Q" toggle-debug-on-quit "tdoq")
@ -1662,7 +1662,7 @@ _u_: next word ^_l_: edit lines^ _s_: next whole symbol
("h" my-help-hydra/body "Help")
("i" (find-file "~/.emacs.d/init.org") "open init")
("I" contrapunctus-info-hydra/body "Info")
("k" (kill-buffer (current-buffer)) "kill")
("k" (kill-buffer (current-buffer)) "kill" :color red)
("N" contrapunctus-line-display-hydra/body "line display")
("o" save-buffer "save")
("Q" toggle-debug-on-quit "tdoq")
@ -1694,7 +1694,7 @@ _u_: next word ^_l_: edit lines^ _s_: next whole symbol
("h" my-help-hydra/body "Help")
("i" (find-file "~/.emacs.d/init.org") "open init")
("I" contrapunctus-info-hydra/body "Info")
("k" (kill-buffer (current-buffer)) "kill")
("k" (kill-buffer (current-buffer)) "kill" :color red)
("m" magit-status "magit")
("N" contrapunctus-line-display-hydra/body "line display")
("o" save-buffer "save")
@ -1725,7 +1725,7 @@ _u_: next word ^_l_: edit lines^ _s_: next whole symbol
("h" my-help-hydra/body "Help")
("i" (find-file "~/.emacs.d/init.org") "open init")
("I" contrapunctus-info-hydra/body "Info")
("k" (kill-buffer (current-buffer)) "kill")
("k" (kill-buffer (current-buffer)) "kill" :color red)
("N" contrapunctus-line-display-hydra/body "line display")
("o" save-buffer "save")
("Q" toggle-debug-on-quit "tdoq")
@ -1755,7 +1755,7 @@ _u_: next word ^_l_: edit lines^ _s_: next whole symbol
("h" my-help-hydra/body "Help")
("i" (find-file "~/.emacs.d/init.org") "open init")
("I" contrapunctus-info-hydra/body "Info")
("k" (kill-buffer (current-buffer)) "kill")
("k" (kill-buffer (current-buffer)) "kill" :color red)
("N" contrapunctus-line-display-hydra/body "line display")
("o" save-buffer "save")
("Q" toggle-debug-on-quit "tdoq")