# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 779703086 0
# Node ID 1b047b18e8600dce7e06f4e0de288108aed0df19
# Parent  aa4159cad5ed555e0d06125d67607fa83a511638
(shrink-window-if-larger-than-buffer):
Do nothing in minibuffer-only frame.

diff -r aa4159cad5ed -r 1b047b18e860 lisp/window.el
--- a/lisp/window.el	Fri Sep 16 07:51:40 1994 +0000
+++ b/lisp/window.el	Fri Sep 16 08:11:26 1994 +0000
@@ -170,6 +170,7 @@
       (if (and (< 1 (count-windows))
 	       (= (window-width) (frame-width))
 	       (pos-visible-in-window-p (point-min) window)
+	       (not (eq mini 'only))
 	       (or (not mini)
 		   (< (nth 3 edges)
 		      (nth 1 (window-edges mini)))