[elpa] master 0a5074a 09/36: hydra.el (hydra--format): Avoid inf loops

[Oleh Krehel]

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

    hydra.el (hydra--format): Avoid inf loops
    
    When a unrecognized key is found, skip it and go on.
---
 hydra.el | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/hydra.el b/hydra.el
index 573fcc0..e1dedd2 100644
--- a/hydra.el
+++ b/hydra.el
@@ -629,6 +629,7 @@ The expressions can be auto-expanded according to NAME."
                              hydra-doc-format-spec
                              (concat "%" (match-string 3 docstring) "s"))
                             t nil docstring)))
+                 (setq start (match-end 0))
                  (warn "Unrecognized key: ?%s?" key))))
             ((eq ?_ (aref (match-string 0 docstring) 0))
              (let* ((key (match-string 4 docstring))
@@ -652,6 +653,7 @@ The expressions can be auto-expanded according to NAME."
                              hydra-key-format-spec
                              (concat "%" (match-string 3 docstring) "s"))
                             t nil docstring)))
+                 (setq start (match-end 0))
                  (warn "Unrecognized key: _%s_" key))))
 
             (t