Mercurial > emacs
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.