Skip to content

Instantly share code, notes, and snippets.

@m2ym
Created February 2, 2012 05:30
Show Gist options
  • Select an option

  • Save m2ym/1721707 to your computer and use it in GitHub Desktop.

Select an option

Save m2ym/1721707 to your computer and use it in GitHub Desktop.
diff --git a/popwin.el b/popwin.el
index 2d8619e..2c628b7 100644
--- a/popwin.el
+++ b/popwin.el
@@ -496,6 +496,8 @@ the popup window will be closed are followings:
(and other-window-selected
(not minibuf-window-p)
(not popwin:popup-window-stuck-p)))
+ (setq this-command 'popwin:close-popup-window)
+ (run-hooks 'pre-command-hook)
(if reading-from-minibuf
(progn
(popwin:close-popup-window)
@@ -506,7 +508,9 @@ the popup window will be closed are followings:
(not popup-buffer-buried))))
(when popup-buffer-changed-despite-of-dedicated
(popwin:switch-to-buffer window-buffer)
- (goto-char window-point)))))))
+ (goto-char window-point)))
+ (run-hooks 'post-command-hook)
+ (execute-kbd-macro [])))))
(defun* popwin:popup-buffer (buffer
&key
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment