diff lisp/prim/frame.el @ 76:c0c698873ce1 r20-0b33

Import from CVS: tag r20-0b33
author cvs
date Mon, 13 Aug 2007 09:05:10 +0200
parents 131b0175ea99
children c7528f8e288d
line wrap: on
line diff
--- a/lisp/prim/frame.el	Mon Aug 13 09:04:39 2007 +0200
+++ b/lisp/prim/frame.el	Mon Aug 13 09:05:10 2007 +0200
@@ -1031,6 +1031,7 @@
       (setq minibuffer-scroll-window window)
       (set-window-start window 1) ; obeys narrowing
       (set-window-point window 1)
+      (shrink-window-if-larger-than-buffer window)
       nil)))
 
 (setq pre-display-buffer-function 'get-frame-for-buffer)