mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

(compile-mouse-goto-error): Move to end of line

Browse source 
before calling `compile-reinitialize-errors', so that it always
sees the entire filename.
This commit is contained in:
Eli Zaretskii 1997-02-19 15:48:50 +00:00
parent 9d497c0123
commit 167d14181c
1 changed files with 5 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lisp/progmodes/compile.el
View 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.