From 2d64f65d5a3ec01968488b090598a91be9e36879 Mon Sep 17 00:00:00 2001 From: Henrik Lissner Date: Thu, 3 Mar 2016 01:38:37 -0500 Subject: [PATCH] shackle: register ert windows --- core/core-popup.el | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/core/core-popup.el b/core/core-popup.el index fdd677ad3..3a2ec45c8 100644 --- a/core/core-popup.el +++ b/core/core-popup.el @@ -12,6 +12,7 @@ ("*quickrun*" :align below :size 15 :noselect t) ("*eval*" :align below :size 15) ("*esup*" :align below :size 30 :noselect t) + ("*ert*" :align below :size 20 :noselect t) ;; vcs ("^\\*git-gutter.+\\*$" :regexp t :align below :size 0.4 :noselect t) @@ -48,6 +49,12 @@ (with-current-buffer b repl-p))))) :popup t :align below :size 16))) + (after! ert + (add-hook! 'ert-results-mode-hook (setq mode-line-format nil)) + (map! (:map ert-results-mode-map + [escape] 'quit-window + "" 'quit-window))) + (after! help-mode ;; So that help buffer links do not open in the help popup, we need to redefine these ;; three button types to use `switch-to-buffer-other-window' rather than