Mercurial > emacs

diff lisp/calc/calc.el @ 105478:e3187820f169

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Use window-full-height-p.
author Glenn Morris <rgm@gnu.org>
date Tue, 06 Oct 2009 02:42:29 +0000
parents 4c610ec5ed40
children 4d7b61a743cb
line wrap: on
line diff
--- a/lisp/calc/calc.el	Tue Oct 06 02:37:22 2009 +0000
+++ b/lisp/calc/calc.el	Tue Oct 06 02:42:29 2009 +0000
@@ -1496,7 +1496,7 @@
         ;; next time Calc is called, the window will be the same size
         ;; as the current window.
         (if (and win
-                 (< (window-height win) (1- (frame-height)))
+		 (not (window-full-height-p win))
                  (window-full-width-p win) ; avoid calc-keypad
                  (not (get-buffer-window "*Calc Keypad*")))
             (setq calc-window-height (- (window-height win) 2)))