procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fix whitespace-report window creation

Browse source 
* lisp/whitespace.el (whitespace-display-window): Avoid creating
many buffers if called many times (bug#50716).
This commit is contained in:
Lars Ingebrigtsen 2021-09-21 07:29:55 +02:00
parent 02a2fba786
commit f23c5c3e44
1 changed files with 2 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
lisp/whitespace.el
View file

@ -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)