diff options
| author | Ravi R Kiran <aine.marina@gmail.com> | 2021-04-25 03:14:19 (GMT) |
|---|---|---|
| committer | Ravi R Kiran <aine.marina@gmail.com> | 2021-04-25 03:14:19 (GMT) |
| commit | 33872f218c2de9de542bd082ce741ae63740e40e (patch) | |
| tree | 41a4a0bcee6870617aaf9802e1001f220b12368d | |
| parent | 0477c109bfd654fbefa91ed0f6ea5171fb8931ca (diff) | |
| download | dotemacs-33872f218c2de9de542bd082ce741ae63740e40e.zip dotemacs-33872f218c2de9de542bd082ce741ae63740e40e.tar.gz dotemacs-33872f218c2de9de542bd082ce741ae63740e40e.tar.bz2 | |
Handle compilation buffer properly
| -rw-r--r-- | lisp/ravi-init-appearance.el | 22 |
1 files changed, 8 insertions, 14 deletions
diff --git a/lisp/ravi-init-appearance.el b/lisp/ravi-init-appearance.el index 730ea54..9d705a6 100644 --- a/lisp/ravi-init-appearance.el +++ b/lisp/ravi-init-appearance.el @@ -273,27 +273,21 @@ Delete all whitespace on a successive key press." (bind-key "C-h a" 'apropos) -(use-package popwin - :config - (progn - (popwin-mode 1) - (push '("*Pp Eval Output*" :height 15) popwin:special-display-config) - ;; Do not show compilation buffer if already visible elsewhere - (add-to-list 'display-buffer-alist - `(,(rx bos "*compilation*" eos) - (display-buffer-reuse-window - popwin:display-buffer-action) - (reusable-frames . t)))) - :disabled) - (add-to-list 'display-buffer-alist `(,(rx bos "*compilation*" eos) (display-buffer-reuse-window display-buffer-in-previous-window - display-buffer-at-bottom) + display-buffer-in-side-window) (reusable-frames . t) (inhibit-same-window . t) + (side . bottom) (window-height . 15))) +(defun ravi/quit-side-windows () + "Quit all side windows at bottom of current frame" + (interactive) + (dolist (window (window-at-side-list)) + (quit-window nil window))) +(bind-key "S-<f5>" 'ravi/quit-side-windows) (use-package import-popwin :bind (("M-I" . import-popwin))) |