bug-gnu-emacs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

bug#16351: balance-windows


From: martin rudalics
Subject: bug#16351: balance-windows
Date: Tue, 07 Jan 2014 12:51:02 +0100

A minimal recipe is:

emacs -Q
C-x 2 C-x 2
C-x +
(no effect).

Arrrgh.  I'll check in a fix later today.  If you want to try it
now, do the below.  Eduard: This should fix your problem as well.

Thanks, martin


=== modified file 'lisp/window.el'
--- lisp/window.el      2014-01-05 16:29:44 +0000
+++ lisp/window.el      2014-01-07 11:41:17 +0000
@@ -4541,7 +4541,7 @@
     (setq sub first)
     (while (and sub (> rest 0))
       (unless (window--resize-child-windows-skip-p window)
-       (set-window-new-pixel sub char-size t)
+       (set-window-new-pixel sub (min rest char-size) t)
        (setq rest (- rest char-size)))
       (setq sub (window-right sub)))

@@ -4550,7 +4550,7 @@
     (setq sub first)
     (while (and sub (> rest 0))
       (unless (eq (window-new-normal sub) 'ignore)
-       (set-window-new-pixel sub char-size t)
+       (set-window-new-pixel sub (min rest char-size) t)
        (setq rest (- rest char-size)))
       (setq sub (window-right sub)))










reply via email to

[Prev in Thread] Current Thread [Next in Thread]