mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2025-01-18 18:05:07 +00:00
(select-tags-table-quit): Use quit-window.
This commit is contained in:
parent
5904765365
commit
7591cf05f5
@ -1650,9 +1650,7 @@ see the doc of that variable if you want to add names to the list."
|
||||
(defun select-tags-table-quit ()
|
||||
"Kill the buffer and delete the selected window."
|
||||
(interactive)
|
||||
(kill-buffer (current-buffer))
|
||||
(or (one-window-p)
|
||||
(delete-window)))
|
||||
(quit-window t (selected-window)))
|
||||
|
||||
;;; Note, there is another definition of this function in bindings.el.
|
||||
;;;###autoload
|
||||
|
Loading…
Reference in New Issue
Block a user