# HG changeset patch # User Eli Zaretskii # Date 856367330 0 # Node ID c9f46b04dad0323b501a27cb1ae8e6866cc6d6ab # Parent 2d67501c45b9bd02361bce7d49f1d833ad94b28a (compile-mouse-goto-error): Move to end of line before calling `compile-reinitialize-errors', so that it always sees the entire filename. diff -r 2d67501c45b9 -r c9f46b04dad0 lisp/progmodes/compile.el --- a/lisp/progmodes/compile.el Wed Feb 19 10:24:26 1997 +0000 +++ b/lisp/progmodes/compile.el Wed Feb 19 15:48:50 1997 +0000 @@ -897,6 +897,11 @@ (or (compilation-buffer-p (current-buffer)) (error "Not in a compilation buffer.")) (setq compilation-last-buffer (current-buffer)) + ;; `compile-reinitialize-errors' needs to see the complete filename + ;; on the line where they clicked the mouse. Since it only looks + ;; upto point, moving point to eol makes sure the filename is + ;; visible to `compile-reinitialize-errors'. + (end-of-line) (compile-reinitialize-errors nil (point)) ;; Move to bol; the marker for the error on this line will point there.