emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

master d30351e0381: Update recent find-func change to fix elisp-mode-tes


From: Stephen Gildea
Subject: master d30351e0381: Update recent find-func change to fix elisp-mode-tests
Date: Thu, 16 Jan 2025 09:11:43 -0500 (EST)

branch: master
commit d30351e03815e5914ec486607441e449c02c6c45
Author: Stephen Gildea <stepheng+emacs@gildea.com>
Commit: Stephen Gildea <stepheng+emacs@gildea.com>

    Update recent find-func change to fix elisp-mode-tests
    
    * lisp/emacs-lisp/find-func.el (find-function-search-for-symbol):
    Check that symbol is a symbol before trying to get a property.
---
 lisp/emacs-lisp/find-func.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lisp/emacs-lisp/find-func.el b/lisp/emacs-lisp/find-func.el
index 643b6aba2a6..40bcdfe756a 100644
--- a/lisp/emacs-lisp/find-func.el
+++ b/lisp/emacs-lisp/find-func.el
@@ -413,7 +413,8 @@ The search is done in the source for library LIBRARY."
   ;; that defines something else.
   (while (and (symbolp symbol) (get symbol 'definition-name))
     (setq symbol (get symbol 'definition-name)))
-  (setq type (or (get symbol 'definition-type)
+  (setq type (or (and (symbolp symbol)
+                      (get symbol 'definition-type))
                  type))
   (if (string-match "\\`src/\\(.*\\.\\(c\\|m\\)\\)\\'" library)
       (find-function-C-source symbol (match-string 1 library) type)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]