mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-06 23:51:24 -08:00
Code Issues Projects Releases Wiki Activity

Fix previous grep-file-at-point change

Browse source 
* lisp/progmodes/grep.el (grep-file-at-point): Fix previous change.
This commit is contained in:
Lars Ingebrigtsen 2021-07-17 16:56:35 +02:00
parent 9ee418b7b9
commit 6b802a08ca
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lisp/progmodes/grep.el
View file

@ -1348,7 +1348,7 @@ command before it's run."
(defun grep-file-at-point (point)
"Return the name of the file at POINT a `grep-mode' buffer.
The returned file name is relative."
(when-let ((msg (get-text-property (point) 'compilation-message))
(when-let ((msg (get-text-property point 'compilation-message))
(loc (compilation--message->loc msg)))
(caar (compilation--loc->file-struct loc))))