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

Fix etags-xref-find for references

Browse source 
* lisp/progmodes/elisp-mode.el (elisp--xref-find-references): Use `cl-mapcan'.

* lisp/progmodes/etags.el (etags-xref-find): Ditto.  Prompt for
directory if no tags tables are loaded (bug#19468).
This commit is contained in:
Dmitry Gutov 2015-05-02 13:11:07 +03:00
parent 3874b33a32
commit 3bfb6a0f12
2 changed files with 10 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lisp/progmodes/elisp-mode.el
View file

@ -650,7 +650,7 @@ It can be quoted, or be inside a quoted form."
(if (string-prefix-p (car ref) (cadr ref))
(setcdr ref (cddr ref))
(setq ref (cdr ref))))
(mapcan
(cl-mapcan
(lambda (dir)
(and (file-exists-p dir)
(xref-collect-references symbol dir)))