branch: master
commit 83b9019944b768ec4a213f99594b31209b36e8c2
Author: Oleh Krehel <ohwoeo...@gmail.com>
Commit: Oleh Krehel <ohwoeo...@gmail.com>
hydra.el (hydra-width-spec-regex): Update
Fixes #188
---
hydra.el | 5 ++---
1 file changed, 2 insertions(+), 3 deletions(-)
diff --git a/hydra.el b/hydra.el
index ff31b3d..f711044 100644
--- a/hydra.el
+++ b/hydra.el
@@ -590,7 +590,7 @@ HEAD's binding is returned as a string wrapped with [] or
{}."
("⌦" . "<deletechar>")
("⏎" . "RET")))
-(defconst hydra-width-spec-regex " ?-?[0-9]*s?"
+(defconst hydra-width-spec-regex " ?-?[0-9]*?"
"Regex for the width spec in keys and %` quoted sexps.")
(defvar hydra-key-regex "\\[\\|]\\|[-[:alnum:]
~.,;:/|?<>={}*+#%@!&^↑↓←→⌫⌦⏎'`()\"]+?"
@@ -610,8 +610,7 @@ The expressions can be auto-expanded according to NAME."
(while (setq start
(string-match
(format
-
"\\(?:%%\\(%s\\)\\(`[a-z-A-Z/0-9]+\\|(\\)\\)\\|\\(?:[_?]\\(%s\\)\\(%s\\)[_?]\\)"
- hydra-width-spec-regex
+ "\\(?:%%\\(
?-?[0-9]*s?\\)\\(`[a-z-A-Z/0-9]+\\|(\\)\\)\\|\\(?:[_?]\\(%s\\)\\(%s\\)[_?]\\)"
hydra-width-spec-regex
hydra-key-regex)
docstring start))
