diff options
Diffstat (limited to 'lisp/progmodes/compile.el')
-rw-r--r-- | lisp/progmodes/compile.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/progmodes/compile.el b/lisp/progmodes/compile.el index 1bf72c0b62..6987293ea0 100644 --- a/lisp/progmodes/compile.el +++ b/lisp/progmodes/compile.el @@ -1850,7 +1850,8 @@ Pop up the buffer containing MARKER and scroll to MARKER if we ask the user." (setq compilation-old-error-list (cdr compilation-old-error-list))) (setq compilation-error-list nil compilation-directory-stack (list default-directory)) - (set-marker compilation-parsing-end 1) + (if compilation-parsing-end + (set-marker compilation-parsing-end 1)) ;; Remove the highlighting added by compile-reinitialize-errors: (let ((inhibit-read-only t) (buffer-undo-list t) |