Mercurial > emacs

changeset 21097:eb3dc7ea93c2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(select-tags-table-quit): Use quit-window.
author Richard M. Stallman <rms@gnu.org>
date Sun, 08 Mar 1998 00:22:03 +0000
parents 712fd7860b32
children c5a14d40e00e
files lisp/progmodes/etags.el
diffstat 1 files changed, 1 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/progmodes/etags.el	Sun Mar 08 00:21:26 1998 +0000
+++ b/lisp/progmodes/etags.el	Sun Mar 08 00:22:03 1998 +0000
@@ -1650,9 +1650,7 @@
 (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