Mercurial > emacs

changeset 16997:c9f46b04dad0

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(compile-mouse-goto-error): Move to end of line before calling `compile-reinitialize-errors', so that it always sees the entire filename.
author Eli Zaretskii <eliz@gnu.org>
date Wed, 19 Feb 1997 15:48:50 +0000
parents 2d67501c45b9
children 98f917a99501
files lisp/progmodes/compile.el
diffstat 1 files changed, 5 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- 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.