diff options
| author | Dmitry Gutov <dgutov@yandex.ru> | 2015-11-29 23:41:58 +0200 |
|---|---|---|
| committer | Dmitry Gutov <dgutov@yandex.ru> | 2015-11-29 23:41:58 +0200 |
| commit | 0887bdf90bed0749813632cc67a5663fbed64371 (patch) | |
| tree | 64291ae989f7f9d817e22e19dbaf2859d479ec15 /lisp | |
| parent | 1e010227bbe4120e9420d19037a17a7f4fbd228f (diff) | |
| download | emacs-0887bdf90bed0749813632cc67a5663fbed64371.tar.gz | |
Update menu-bar-goto-uses-etags-p for the current xref API
* lisp/menu-bar.el (menu-bar-goto-uses-etags-p): Consult
xref-backend-functions, instead of now-nonexistent
xref-find-function.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/menu-bar.el | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el index defd8db6c0d..fe2b6a6681b 100644 --- a/lisp/menu-bar.el +++ b/lisp/menu-bar.el @@ -413,9 +413,8 @@ menu)) (defun menu-bar-goto-uses-etags-p () - (if (boundp 'xref-find-function) - (eq xref-find-function 'etags-xref-find) - t)) + (or (not (boundp 'xref-backend-functions)) + (eq (car xref-backend-functions) 'etags--xref-backend))) (defvar yank-menu (cons (purecopy "Select Yank") nil)) (fset 'yank-menu (cons 'keymap yank-menu)) |