changeset 8093:1978838b7b6f

(resize-minibuffer-window-restore): Don't do anything if the window height is already 1.
author Noah Friedman <friedman@splode.com>
date Thu, 30 Jun 1994 06:46:44 +0000
parents de6f0cdfd332
children d9c6c2429f85
files lisp/rsz-mini.el
diffstat 1 files changed, 5 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/rsz-mini.el	Thu Jun 30 04:49:26 1994 +0000
+++ b/lisp/rsz-mini.el	Thu Jun 30 06:46:44 1994 +0000
@@ -7,7 +7,7 @@
 ;;; Maintainer: friedman@prep.ai.mit.edu
 ;;; Keywords: minibuffer, window, frame, display
 ;;; Status: Known to work in FSF GNU Emacs 19.26 and later.
-;;; $Id: rsz-mini.el,v 1.3 1994/05/20 17:43:40 friedman Exp friedman $
+;;; $Id: rsz-mini.el,v 1.4 1994/06/22 22:14:28 friedman Exp friedman $
 
 ;; This file is part of GNU Emacs.
 
@@ -207,8 +207,10 @@
 ;; its idea of the minibuffer window size when the minibuffer isn't in use
 ;; anyway; this is just a kludge because of the timing for that update).
 (defun resize-minibuffer-window-restore ()
-  (enlarge-window (- 1 (window-height)))
-  (sit-for 0))
+  (cond
+   ((> (window-height) 1)
+    (enlarge-window (- 1 (window-height)))
+    (sit-for 0))))
 
 
 ;; Resize the minibuffer frame to contain the minibuffer's contents.