From 4dc09324b3016ec5c0af591b54ee9e3679eff920 Mon Sep 17 00:00:00 2001 From: contrapunctus Date: Sun, 1 Aug 2021 00:39:55 +0530 Subject: [PATCH] [hydra] change color of kill-buffer to red --- init.org | 18 +++++++++--------- 1 file changed, 9 insertions(+), 9 deletions(-) diff --git a/init.org b/init.org index 212a719..7be86e1 100644 --- a/init.org +++ b/init.org @@ -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")