1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-25 10:47:00 +00:00

(fit-window-to-buffer, window-safely-shrinkable-p)

(shrink-window-if-larger-than-buffer): Doc fix.
This commit is contained in:
Eli Zaretskii 2001-02-23 21:35:45 +00:00
parent dcd5ecef41
commit 119171dd3d
2 changed files with 9 additions and 1 deletions

View File

@ -1,3 +1,8 @@
2001-02-23 Eli Zaretskii <eliz@is.elta.co.il>
* window.el (fit-window-to-buffer, window-safely-shrinkable-p)
(shrink-window-if-larger-than-buffer): Doc fix.
2001-02-23 Stefan Monnier <monnier@cs.yale.edu>
* hi-lock.el (hi-lock-unface-buffer): Use nil rather than t for

View File

@ -143,7 +143,8 @@ even if it is inactive."
count))
(defun window-safely-shrinkable-p (&optional window)
"Non-nil if the WINDOW can be shrunk without shrinking other windows."
"Non-nil if the WINDOW can be shrunk without shrinking other windows.
If WINDOW is nil or omitted, it defaults to the currently selected window."
(save-selected-window
(when window (select-window window))
(or (and (not (eq window (frame-first-window)))
@ -367,6 +368,7 @@ in some window."
(defun fit-window-to-buffer (&optional window max-height min-height)
"Make WINDOW the right size to display its contents exactly.
If WINDOW is omitted or nil, it defaults to the selected window.
If the optional argument MAX-HEIGHT is supplied, it is the maximum height
the window is allowed to be, defaulting to the frame height.
If the optional argument MIN-HEIGHT is supplied, it is the minimum
@ -452,6 +454,7 @@ header-line."
(defun shrink-window-if-larger-than-buffer (&optional window)
"Shrink the WINDOW to be as small as possible to display its contents.
If WINDOW is omitted or nil, it defaults to the selected window.
Do not shrink to less than `window-min-height' lines.
Do nothing if the buffer contains more lines than the present window height,
or if some of the window's contents are scrolled out of view,