Mercurial > emacs
changeset 78418:c43bd3dbaa93
(resize-temp-buffer-window): Use window-full-width-p
instead of comparing frame-width and window-width.
author | Martin Rudalics <rudalics@gmx.at> |
---|---|
date | Mon, 06 Aug 2007 06:49:49 +0000 |
parents | f992ef3a763a |
children | 12b14a633dc9 |
files | lisp/help.el |
diffstat | 1 files changed, 2 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/help.el Mon Aug 06 06:47:09 2007 +0000 +++ b/lisp/help.el Mon Aug 06 06:49:49 2007 +0000 @@ -958,14 +958,14 @@ (remove-hook 'temp-buffer-show-hook 'resize-temp-buffer-window))) (defun resize-temp-buffer-window () - "Resize the current window to fit its contents. + "Resize the selected window to fit its contents. Will not make it higher than `temp-buffer-max-height' nor smaller than `window-min-height'. Do nothing if it is the only window on its frame, if it is not as wide as the frame or if some of the window's contents are scrolled out of view." (unless (or (one-window-p 'nomini) (not (pos-visible-in-window-p (point-min))) - (/= (frame-width) (window-width))) + (not (window-full-width-p))) (fit-window-to-buffer (selected-window) (if (functionp temp-buffer-max-height)