[Emacs-diffs] Changes to emacs/lisp/electric.el,v

[Chong Yidong]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Chong Yidong <cyd>      08/10/29 21:42:37

Index: electric.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/electric.el,v
retrieving revision 1.32
retrieving revision 1.33
diff -u -b -r1.32 -r1.33
--- electric.el 6 May 2008 07:57:33 -0000       1.32
+++ electric.el 29 Oct 2008 21:42:37 -0000      1.33
@@ -153,8 +153,10 @@
             (setq win (selected-window)))
            (t
             (switch-to-buffer buf)))
-      (fit-window-to-buffer win max-height)
+      ;; Don't shrink the window, but expand it if necessary.
       (goto-char (point-min))
+      (unless (= (point-max) (window-end win))
+       (fit-window-to-buffer win max-height))
       win)))
 
 (provide 'electric)