branch: master
commit 99b2aea8a178986a76ba52a3f1659d7099ddbfa1
Author: Oleh Krehel <[email protected]>
Commit: Oleh Krehel <[email protected]>
hydra.el (hydra--format): Match alnum for the "_..._" syntax
Fixes #106
---
hydra.el | 2 +-
1 files changed, 1 insertions(+), 1 deletions(-)
diff --git a/hydra.el b/hydra.el
index 39c027c..970716f 100644
--- a/hydra.el
+++ b/hydra.el
@@ -456,7 +456,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]*\\)\\([a-z-A-Z~.,;:0-9/|?<>={}*+#]+\\)_\\)"
+ "\\(?:%\\(
?-?[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))