emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] master ad8def1 04/24: Match e.g. "C-d C-o" in docstring


From: Oleh Krehel
Subject: [elpa] master ad8def1 04/24: Match e.g. "C-d C-o" in docstring
Date: Fri, 01 May 2015 14:27:09 +0000

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

    Match e.g. "C-d C-o" in docstring
    
    * hydra.el (hydra--format): Allow space; make the regex non-greedy.
    
    Fixes #116
---
 hydra.el |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/hydra.el b/hydra.el
index fdd3847..125bb1c 100644
--- a/hydra.el
+++ b/hydra.el
@@ -474,7 +474,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))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]