From 86f5f069d0c31d4afa5386c52290b6632e9f380e Mon Sep 17 00:00:00 2001 From: Kjetil Orbekk Date: Sun, 7 Jan 2024 19:37:17 -0500 Subject: fix help window placement --- emacs/.config/emacs-v2/lisp/kj-init.el | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/emacs/.config/emacs-v2/lisp/kj-init.el b/emacs/.config/emacs-v2/lisp/kj-init.el index ec86e34..c67bf9c 100644 --- a/emacs/.config/emacs-v2/lisp/kj-init.el +++ b/emacs/.config/emacs-v2/lisp/kj-init.el @@ -843,13 +843,13 @@ (defun kj/buffer-help-p (buf act) "BUF is a help buffer, ignore ACT." - (member (buffer-local-value 'major-mode (get-buffer buf)) kj/help-modes)) + (with-current-buffer buf + (apply 'derived-mode-p kj/help-modes))) (add-to-list 'display-buffer-alist - `(kj/help-modes ;predicate - (display-buffer--maybe-same-window - display-buffer-reuse-window - display-buffer-reuse-mode-window) ;functions to try + `(kj/buffer-help-p + (display-buffer-reuse-window + display-buffer-reuse-mode-window) (mode . ,kj/help-modes) (inhibit-same-window . nil))) -- cgit v1.2.3