Commit d223727a authored by Devon Sean McCullough's avatar Devon Sean McCullough Committed by Eli Zaretskii

Fix UI of Buffer-menu

* lisp/buff-menu.el (Buffer-menu-execute): Don't remove
entries of buffers whose killing the user didn't confirm.
(Bug#33669)
parent 0f716557
Pipeline #515 passed with stage
in 27 minutes and 11 seconds
......@@ -475,10 +475,10 @@ Buffers marked with \\<Buffer-menu-mode-map>`\\[Buffer-menu-delete]' are deleted
(save-buffer))
(tabulated-list-set-col 2 " " t))
(error (warn "Error saving %s" buffer))))
(if delete
(unless (eq buffer (current-buffer))
(kill-buffer buffer)
(tabulated-list-delete-entry))
(if (and delete
(not (eq buffer (current-buffer)))
(kill-buffer buffer))
(tabulated-list-delete-entry)
(forward-line 1)))))))))
(defun Buffer-menu-select ()
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment