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

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

[elpa] master 785f837 6/8: hydra.el (defhydra): Use `clear-temporary-ove


From: Oleh Krehel
Subject: [elpa] master 785f837 6/8: hydra.el (defhydra): Use `clear-temporary-overlay-map'
Date: Fri, 30 Jan 2015 16:18:51 +0000

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

    hydra.el (defhydra): Use `clear-temporary-overlay-map'
    
    * hydra.el (defhydra): Add a fix for old Emacs versions that don't have
    `set-transient-map'.
    
    Fixes #10.
---
 hydra.el |    5 ++++-
 1 files changed, 4 insertions(+), 1 deletions(-)

diff --git a/hydra.el b/hydra.el
index 6f21215..c453dea 100644
--- a/hydra.el
+++ b/hydra.el
@@ -170,7 +170,10 @@ HEADS is a list of (KEY CMD &optional HINT)."
                ,(format "%s\n\nCall the head: `%S'." doc (cadr head))
                (interactive)
                ,@(if (null (cadr head))
-                     '((when hydra-last (funcall hydra-last)))
+                     '((if (functionp hydra-last)
+                           (funcall hydra-last)
+                         (ignore-errors
+                           (funcall 'clear-temporary-overlay-map))))
                      `((call-interactively #',(cadr head))
                        (when hydra-is-helpful
                          (message ,hint))



reply via email to

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