(compile-mouse-goto-error): Move to end of line
authorEli Zaretskii <eliz@gnu.org>
Wed, 19 Feb 1997 15:48:50 +0000 (15:48 +0000)
committerEli Zaretskii <eliz@gnu.org>
Wed, 19 Feb 1997 15:48:50 +0000 (15:48 +0000)
before calling `compile-reinitialize-errors', so that it always
sees the entire filename.

lisp/progmodes/compile.el

index a95d260..7760890 100644 (file)
@@ -897,6 +897,11 @@ Does NOT find the source line like \\[next-error]."
     (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.