[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] emacs-25 468659c 2/4: * lisp/menu-bar.el (menu-bar-goto-us
From: |
Artur Malabarba |
Subject: |
[Emacs-diffs] emacs-25 468659c 2/4: * lisp/menu-bar.el (menu-bar-goto-uses-etags-p): Fix a warning |
Date: |
Sun, 29 Nov 2015 21:27:42 +0000 |
branch: emacs-25
commit 468659cd365f9bae7d6eeacda568800cb1f49e37
Author: Artur Malabarba <address@hidden>
Commit: Artur Malabarba <address@hidden>
* lisp/menu-bar.el (menu-bar-goto-uses-etags-p): Fix a warning
---
lisp/menu-bar.el | 5 +++--
1 files changed, 3 insertions(+), 2 deletions(-)
diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el
index 42f48c7..b2146be 100644
--- a/lisp/menu-bar.el
+++ b/lisp/menu-bar.el
@@ -413,8 +413,9 @@
menu))
(defun menu-bar-goto-uses-etags-p ()
- (or (not (boundp 'xref-find-function))
- (eq xref-find-function 'etags-xref-find)))
+ (if (boundp 'xref-find-function)
+ (eq xref-find-function 'etags-xref-find)
+ t))
(defvar yank-menu (cons (purecopy "Select Yank") nil))
(fset 'yank-menu (cons 'keymap yank-menu))