procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(compilation-start): Make sure to move to point-max

Browse source 
only when we are in the compilation buffer.
This commit is contained in:
Martin Rudalics 2008-10-04 10:09:46 +00:00
parent 48e482e616
commit e6f3e10423
2 changed files with 14 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/ChangeLog
View file

@ -1,3 +1,8 @@
2008-10-04 Martin Rudalics <rudalics@gmx.at>
* progmodes/compile.el (compilation-start): Make sure to move to
point-max only when we are in the compilation buffer. (Bug#1073)
2008-10-04 Dan Nicolaescu <dann@ics.uci.edu>
* faces.el (x-create-frame-with-faces): Only setup the toolbar if

14
lisp/progmodes/compile.el
View file

@ -1279,11 +1279,15 @@ Returns the compilation buffer created."
(setq compilation-in-progress
(cons proc compilation-in-progress))))
;; Now finally cd to where the shell started make/grep/...
(setq default-directory thisdir))
(if (buffer-local-value 'compilation-scroll-output outbuf)
(save-selected-window
(select-window outwin)
(goto-char (point-max))))
(setq default-directory thisdir)
;; The following form selected outwin ever since revision 1.183,
;; so possibly messing up point in some other window (bug#1073).
;; Moved into the scope of with-current-buffer, though still with
;; complete disregard for the case when compilation-scroll-output
;; equals 'first-error (martin 2008-10-04).
(when compilation-scroll-output
(goto-char (point-max))))
;; Make it so the next C-x ` will use this buffer.
(setq next-error-last-buffer outbuf)))