hydra.el (hydra--format): Allow "@" key in the docs

Fixes #158
11 years ago · 3fb316881a
parent f58d356724
commit 3fb316881a
1 changed files with 1 additions and 1 deletions
--- a/hydra.el
+++ b/hydra.el
@ -572,7 +572,7 @@ The expressions can be auto-expanded according to NAME."
        offset)
    (while (setq start
                 (string-match
-                  "\\(?:%\\( ?-?[0-9]*s?\\)\\(`[a-z-A-Z/0-9]+\\|(\\)\\)\\|\\(?:_\\( ?-?[0-9]*?\\)\\(\\[\\|]\\|[-[:alnum:] ~.,;:/|?<>={}*+#%]+?\\)_\\)"
+                  "\\(?:%\\( ?-?[0-9]*s?\\)\\(`[a-z-A-Z/0-9]+\\|(\\)\\)\\|\\(?:_\\( ?-?[0-9]*?\\)\\(\\[\\|]\\|[-[:alnum:] ~.,;:/|?<>={}*+#%@]+?\\)_\\)"
                  docstring start))
      (cond ((eq ?_ (aref (match-string 0 docstring) 0))
             (let* ((key (match-string 4 docstring))