hydra.el (hydra--format): Fix "s-t" issue

* hydra.el (hydra--format): Update. Fixes #107.
11 years ago · 00aef5927c
parent 684f8a2d71
commit 00aef5927c
1 changed files with 1 additions and 1 deletions
--- a/hydra.el
+++ b/hydra.el
@ -460,7 +460,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))