In fit-window-to-buffer fix argument in window-size call.

* window.el (fit-window-to-buffer): Fix argument in window-size
call when window is horizontally combined.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index e5c44a1232a8bda77c377ae3d045ffc97586bb58..17f225708a22ad82265c48472370da78b37740ca 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2014-03-02  Martin Rudalics  <rudalics@gmx.at>
+
+       * window.el (fit-window-to-buffer): Fix argument in window-size
+       call when window is horizontally combined.
+
 2014-03-02  Juanma Barranquero  <lekktu@gmail.com>
 
        * icomplete.el (icomplete-completions): Use string-width.

diff --git a/lisp/window.el b/lisp/window.el
index be56f8dd6946553fceb3c9150bbc881c6407538c..95672fe87d736da43482ab1cef46df2da1ca0e86 100644 (file)
--- a/lisp/window.el
+++ b/lisp/window.el
@@ -7237,7 +7237,7 @@ accessible position."
         ((and fit-window-to-buffer-horizontally
               (not (window-size-fixed-p window t))
               (window-combined-p nil t))
-         (let* ((total-width (window-size window nil pixelwise))
+         (let* ((total-width (window-size window t pixelwise))
                 (min-width
                  ;; Sanitize MIN-WIDTH.
                  (if (numberp min-width)