]> git.eshelyaron.com Git - emacs.git/commitdiff
(xref--mouse-2): Fix not to jump to the next line
authorDmitry Gutov <dgutov@yandex.ru>
Thu, 2 May 2019 22:47:15 +0000 (01:47 +0300)
committerDmitry Gutov <dgutov@yandex.ru>
Thu, 2 May 2019 22:53:11 +0000 (01:53 +0300)
* lisp/progmodes/xref.el (xref--mouse-2): Fix not to jump to the
next line.

lisp/progmodes/xref.el

index 18e97bd0f6479fe4af8600f6786daa5e7bc114b2..c7f015b94f03014e656a09cea12d992d80f34542 100644 (file)
@@ -731,7 +731,8 @@ references displayed in the current *xref* buffer."
   (interactive "e")
   (mouse-set-point event)
   (forward-line 0)
-  (xref--search-property 'xref-item)
+  (or (get-text-property (point) 'xref-item)
+      (xref--search-property 'xref-item))
   (xref-show-location-at-point))
 
 (defun xref--insert-xrefs (xref-alist)