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

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

[elpa] master b86d163 40/68: ace-window.el (ace-window-end-once-hook): A


From: Oleh Krehel
Subject: [elpa] master b86d163 40/68: ace-window.el (ace-window-end-once-hook): Add
Date: Sat, 21 Mar 2015 19:07:01 +0000

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

    ace-window.el (ace-window-end-once-hook): Add
---
 ace-window.el |    6 ++++++
 1 files changed, 6 insertions(+), 0 deletions(-)

diff --git a/ace-window.el b/ace-window.el
index 8af8924..b532cd0 100644
--- a/ace-window.el
+++ b/ace-window.el
@@ -92,6 +92,10 @@ Use M-0 `ace-window' to toggle this value."
 (defvar ace-window-end-hook nil
   "Function(s) to call after `ace-window' is done.")
 
+(defvar ace-window-end-once-hook nil
+  "Function(s) to call once after `ace-window' is done.
+This hook is set to nil with each call to `ace-window'.")
+
 (defun aw-ignored-p (window)
   "Return t if WINDOW should be ignored."
   (and aw-ignore-on
@@ -138,6 +142,8 @@ Use M-0 `ace-window' to toggle this value."
              (run-hooks 'ace-jump-mode-before-jump-hook)
              (funcall aw--current-op aj-data))
            (run-hooks 'ace-window-end-hook)
+           (run-hooks 'ace-window-end-once-hook)
+           (setq ace-window-end-once-hook)
            (run-hooks 'ace-jump-mode-end-hook))
 
           (t



reply via email to

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