Mercurial > emacs

diff lisp/window.el @ 99394:97cfe3bfabc8

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(quit-window): Restore prefix argument behavior removed in 2008-10-30 change. (Bug#1308)
author Martin Rudalics <rudalics@gmx.at>
date Wed, 05 Nov 2008 16:44:42 +0000
parents 47fe276a8011
children c094962ecbed
line wrap: on
line diff
--- a/lisp/window.el	Wed Nov 05 11:06:22 2008 +0000
+++ b/lisp/window.el	Wed Nov 05 16:44:42 2008 +0000
@@ -1420,12 +1420,14 @@
 
 (defun quit-window (&optional kill window)
   "Bury or kill (with KILL non-nil) the buffer displayed in WINDOW.
+With a prefix argument, kill the buffer instead.
+
 KILL defaults to nil, WINDOW to the selected window.  If WINDOW
 is dedicated or a minibuffer window, delete it and, if it's the
 only window on its frame, delete its frame as well provided there
 are other frames left.  Otherwise, display some other buffer in
 the window."
-  (interactive)
+  (interactive "P")
   (let* ((window (or window (selected-window)))
 	 (buffer (window-buffer window)))
     (if (or (window-minibuffer-p window) (window-dedicated-p window))