changeset 52570:7dbcd805c2ee

(compile-internal): Call compilation-set-window-height before setting window start.
author Richard M. Stallman <rms@gnu.org>
date Mon, 22 Sep 2003 15:25:47 +0000
parents e4693bed89ad
children 6de55a10c444
files lisp/progmodes/compile.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/progmodes/compile.el	Mon Sep 22 15:23:53 2003 +0000
+++ b/lisp/progmodes/compile.el	Mon Sep 22 15:25:47 2003 +0000
@@ -1094,10 +1094,10 @@
         (set (make-local-variable 'lazy-lock-defer-on-scrolling) t)
 	(setq default-directory thisdir
 	      compilation-directory-stack (list default-directory))
+	(compilation-set-window-height outwin)
 	(set-window-start outwin (point-min))
 	(or (eq outwin (selected-window))
 	    (set-window-point outwin (point-min)))
-	(compilation-set-window-height outwin)
 	(if compilation-process-setup-function
 	    (funcall compilation-process-setup-function))
 	;; Start the compilation.