]> code.delx.au - gnu-emacs-elpa/commitdiff
hydra.el (hydra--format): Add some more symbols
authorOleh Krehel <ohwoeowho@gmail.com>
Fri, 10 Apr 2015 17:57:10 +0000 (19:57 +0200)
committerOleh Krehel <ohwoeowho@gmail.com>
Fri, 10 Apr 2015 17:57:10 +0000 (19:57 +0200)
Re #103 #102

hydra.el

index da7f58eee6b2c72841e1e355d5fa268b301495ad..c817a3f607bcc831dc02ec4a7d823896c0a350bf 100644 (file)
--- a/hydra.el
+++ b/hydra.el
@@ -492,7 +492,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))