543 |
Do nothing if the buffer contains more lines than the present window height, |
Do nothing if the buffer contains more lines than the present window height, |
544 |
or if some of the window's contents are scrolled out of view, |
or if some of the window's contents are scrolled out of view, |
545 |
or if shrinking this window would also shrink another window. |
or if shrinking this window would also shrink another window. |
546 |
or if the window is the only window of its frame. |
or if the window is the only window of its frame." |
|
Return non-nil if the window was shrunk." |
|
547 |
(interactive) |
(interactive) |
548 |
(when (null window) |
(when (null window) |
549 |
(setq window (selected-window))) |
(setq window (selected-window))) |
582 |
|
|
583 |
(defun quit-window (&optional kill window) |
(defun quit-window (&optional kill window) |
584 |
"Quit the current buffer. Bury it, and maybe delete the selected frame. |
"Quit the current buffer. Bury it, and maybe delete the selected frame. |
585 |
\(The frame is deleted if it is contains a dedicated window for the buffer.) |
\(The frame is deleted if it contains a dedicated window for the buffer.) |
586 |
With a prefix argument, kill the buffer instead. |
With a prefix argument, kill the buffer instead. |
587 |
|
|
588 |
Noninteractively, if KILL is non-nil, then kill the current buffer, |
Noninteractively, if KILL is non-nil, then kill the current buffer, |