[elpa] master df7b079 10/22: hydra.el (hydra-head-format): Customize the key formatting

[Oleh Krehel]

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

    hydra.el (hydra-head-format): Customize the key formatting
    
    * hydra.el (hydra--hint): Update.
---
 hydra.el |    5 ++++-
 1 files changed, 4 insertions(+), 1 deletions(-)

diff --git a/hydra.el b/hydra.el
index 80b1a23..f5a36bb 100644
--- a/hydra.el
+++ b/hydra.el
@@ -419,6 +419,9 @@ Return DEFAULT if PROP is not in H."
       (message "")))
   nil)
 
+(defvar hydra-head-format "[%s]: "
+  "The formatter for each head of a plain docstring.")
+
 (defun hydra--hint (body heads)
   "Generate a hint for the echo area.
 BODY, and HEADS are parameters to `defhydra'."
@@ -439,7 +442,7 @@ BODY, and HEADS are parameters to `defhydra'."
        (lambda (x)
          (format
           (if (> (length (cdr x)) 0)
-              (concat "[%s]: " (cdr x))
+              (concat hydra-head-format (cdr x))
             "%s")
           (car x)))
        keys