# HG changeset patch
# User Martin Rudalics <rudalics@gmx.at>
# Date 1186382989 0
# Node ID c43bd3dbaa93a43474de4a652b0fa203cc514980
# Parent  f992ef3a763a1659ffc424b546dbfaca8b0ae0a7
(resize-temp-buffer-window): Use window-full-width-p
instead of comparing frame-width and window-width.

diff -r f992ef3a763a -r c43bd3dbaa93 lisp/help.el
--- 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)