Fix args in 'window-text-pixel-size' call in 'fit-window-to-buffer'

* lisp/window.el (fit-window-to-buffer): Fix arguments in
'window-text-pixel-size' call.

Copyright-paperwork-exempt: yes

diff --git a/lisp/window.el b/lisp/window.el
index ceab43f7cd3896fcf549478d2255b5f9827c8bac..5c4ff83d82d976165cc7a623c118719923a87e76 100644 (file)
--- a/lisp/window.el
+++ b/lisp/window.el
@@ -9113,8 +9113,8 @@ accessible position."
               ;; wider than its frame's pixel width, its height
               ;; remains unaltered.
               (width (+ (car (window-text-pixel-size
-                              window (window-start) (point-max)
-                              (frame-pixel-width)
+                              window (window-start window) nil
+                              (frame-pixel-width (window-frame window))
                               ;; Add one line-height to assure that
                               ;; we're on the safe side.  This
                               ;; overshoots when the first line below