From f23c5c3e445385031d46ee56b89fcda1774a2108 Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Tue, 21 Sep 2021 07:29:55 +0200 Subject: [PATCH] Fix whitespace-report window creation * lisp/whitespace.el (whitespace-display-window): Avoid creating many buffers if called many times (bug#50716). --- lisp/whitespace.el | 9 ++------- 1 file changed, 2 insertions(+), 7 deletions(-) diff --git a/lisp/whitespace.el b/lisp/whitespace.el index 08f809a5aad..adf553938e4 100644 --- a/lisp/whitespace.el +++ b/lisp/whitespace.el @@ -1839,13 +1839,8 @@ cleaning up these problems." "Display BUFFER in a new window." (goto-char (point-min)) (set-buffer-modified-p nil) - (when (< (window-height) (* 2 window-min-height)) - (kill-buffer buffer) - (error "Window height is too small; \ -can't split window to display whitespace toggle options")) - (let ((win (split-window))) - (set-window-buffer win buffer) - (shrink-window-if-larger-than-buffer win))) + (pop-to-buffer buffer) + (shrink-window-if-larger-than-buffer)) (defun whitespace-kill-buffer (buffer-name) -- 2.39.5