Commit fe4dda18 authored by Andreas Schwab's avatar Andreas Schwab
Browse files

(compilation-start): Set window start to

point-min if compilation-scroll-output is nil.
parent 5f5d410a
......@@ -913,7 +913,9 @@ Returns the compilation buffer created."
'compilation-revert-buffer)
(set-window-start outwin (point-min))
(or (eq outwin (selected-window))
(set-window-point outwin (point)))
(set-window-point outwin (if compilation-scroll-output
(point)
(point-min))))
;; The setup function is called before compilation-set-window-height
;; so it can set the compilation-window-height buffer locally.
(if compilation-process-setup-function
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment