[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: grep-find bug when compilation-window-height not nil
From: |
Richard Stallman |
Subject: |
Re: grep-find bug when compilation-window-height not nil |
Date: |
Sun, 21 Sep 2003 18:34:48 -0400 |
Setting (setq compilation-window-height 15) (or anything other than
nil) seems to cause problems with grep-find's output.
Does this give you the right behavior?
cd ~/emacs/lisp/progmodes/
diff -c /home/rms/emacs/lisp/progmodes/compile.el.\~30\~
/home/rms/emacs/lisp/progmodes/compile.el.\~30a\~
*** /home/rms/emacs/lisp/progmodes/compile.el.~30~ Mon Jun 30 09:55:51 2003
--- /home/rms/emacs/lisp/progmodes/compile.el.~30a~ Sun Sep 21 18:00:44 2003
***************
*** 1080,1089 ****
(set (make-local-variable 'lazy-lock-defer-on-scrolling) t)
(setq default-directory thisdir
compilation-directory-stack (list default-directory))
(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.
--- 1080,1089 ----
(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)))
(if compilation-process-setup-function
(funcall compilation-process-setup-function))
;; Start the compilation.
Diff finished at Sun Sep 21 18:01:28