[elpa] master 0cda4ce 26/72: Fix typos

[Oleh Krehel]

branch: master
commit 0cda4ce6f9f322bb649d844f2ba94c71c906299c
Author: Oleh Krehel <address@hidden>
Commit: Oleh Krehel <address@hidden>

    Fix typos
    
    * hydra.el (defhydra): Fix A/An and "aboring".
---
 hydra.el |   22 ++++++++++++----------
 1 files changed, 12 insertions(+), 10 deletions(-)

diff --git a/hydra.el b/hydra.el
index 342aee5..c710ca0 100644
--- a/hydra.el
+++ b/hydra.el
@@ -500,16 +500,18 @@ result of `defhydra'."
             (define-key keymap [t]
               `(lambda ()
                  (interactive)
-                 ,@(if
-                    (memq body-color '(amaranth teal))
-                    `((message ,(format "An %S Hydra can only exit through a 
blue head"
-                                        body-color)))
-                    '((let ((kb (key-binding (this-command-keys))))
-                        (if kb
-                            (if (commandp kb)
-                                (call-interactively kb)
-                              (error "Pink Hydra can't currently handle 
prefixes, aboring"))
-                          (message "A pink Hydra can only exit through a blue 
head")))))
+                 ,@ (cond
+                      ((eq body-color 'amaranth)
+                       '((message "An amaranth Hydra can only exit through a 
blue head")))
+                      ((eq body-color 'teal)
+                       '((message "An teal Hydra can only exit through a blue 
head")))
+                      (t
+                       '((let ((kb (key-binding (this-command-keys))))
+                           (if kb
+                               (if (commandp kb)
+                                   (call-interactively kb)
+                                 (error "Pink Hydra can't currently handle 
prefixes, aborting"))
+                             (message "A pink Hydra can only exit through a 
blue head"))))))
                  (hydra-set-transient-map hydra-curr-map t)
                  (when hydra-is-helpful
                    (unless hydra-lv