branch: master
commit 81ffca093b71c92b8c7450df678a059ab2e87bf8
Author: Oleh Krehel <ohwoeo...@gmail.com>
Commit: Oleh Krehel <ohwoeo...@gmail.com>
Update faces
* hydra.el (hydra-face-red): Set default to actual color red.
(hydra-face-blue): Set default to actual color blue.
(hydra-face-amaranth): Explain better in the doc.
(hydra-face-pink): Explain better in the doc.
---
hydra.el | 10 ++++++----
1 files changed, 6 insertions(+), 4 deletions(-)
diff --git a/hydra.el b/hydra.el
index e1eea08..83c05d0 100644
--- a/hydra.el
+++ b/hydra.el
@@ -105,21 +105,23 @@ It's possible to set this to nil.")
:type 'boolean)
(defface hydra-face-red
- '((t (:foreground "#7F0055" :bold t)))
+ '((t (:foreground "#FF0000" :bold t)))
"Red Hydra heads will persist indefinitely."
:group 'hydra)
(defface hydra-face-blue
- '((t (:foreground "#758BC6" :bold t)))
+ '((t (:foreground "#0000FF" :bold t)))
"Blue Hydra heads will vanquish the Hydra.")
(defface hydra-face-amaranth
'((t (:foreground "#E52B50" :bold t)))
- "Amaranth Hydra can exit only through a blue head.")
+ "Amaranth body has red heads and warns on intercepting non-heads.
+Vanquishable only through a blue head.")
(defface hydra-face-pink
'((t (:foreground "#FF6EB4" :bold t)))
- "Amaranth Hydra can exit only through a blue head.")
+ "Pink body has red heads and on intercepting non-heads calls them without
quitting.
+Vanquishable only through a blue head.")
;;* Fontification
(defun hydra-add-font-lock ()
"Fontify `defhydra' statements."
