Commit 8eb26765 authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(compilation-next-error-locus): Don't call

compilation-forget-errors if compilation is still runing.
parent 673f4fc6
......@@ -863,7 +863,13 @@ The current buffer should be the desired compilation output buffer."
(error (if (> move 0)
"Moved past last error")
"Moved back past first error"))
(compilation-forget-errors)
;; Forget existing error messages if compilation has finished.
(if (not (and (get-buffer-process (current-buffer))
(eq (process-status
(get-buffer-process
(current-buffer)))
'run)))
(compilation-forget-errors))
(error (concat compilation-error-message
(and (get-buffer-process (current-buffer))
(eq (process-status
......
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