]> code.delx.au - gnu-emacs-elpa/commitdiff
hydra.el (hydra--format): Amend regex
authorOleh Krehel <ohwoeowho@gmail.com>
Thu, 26 Mar 2015 14:56:56 +0000 (15:56 +0100)
committerOleh Krehel <ohwoeowho@gmail.com>
Thu, 26 Mar 2015 14:56:56 +0000 (15:56 +0100)
hydra.el

index 3e4d31103548f56bc76999d4a11ae831063d208e..040a02a83c22fcba7eda3509264fb3269ff47a7a 100644 (file)
--- a/hydra.el
+++ b/hydra.el
@@ -481,7 +481,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]*\\)\\([a-z.,-~A-Z;:0-9/|?<>={}]+\\)_\\)"
                   docstring start))
       (cond ((eq ?_ (aref (match-string 0 docstring) 0))
              (let* ((key (match-string 4 docstring))