mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-30 04:10:54 -08:00
Code Issues Projects Releases Wiki Activity

; Fix recently broken test (bug#77777).

Browse source 
* test/lisp/emacs-lisp/find-func-tests.el
(find-func-tests--locate-macro-generated-symbols): bind
'trusted-content' to names of files in which we want to
expand macros during this test.
This commit is contained in:
Eshel Yaron 2025-04-13 13:53:29 +02:00
parent 7a01350624
commit ebaf424126
No known key found for this signature in database
GPG key ID: EF3EE9CA35D78618
1 changed files with 7 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

11
test/lisp/emacs-lisp/find-func-tests.el
View file

@ -118,10 +118,13 @@ expected function symbol and function library, respectively."
(declare-function compilation--message->loc nil "compile")
(ert-deftest find-func-tests--locate-macro-generated-symbols () ;bug#45443
(should (cdr (find-function-search-for-symbol
#'compilation--message->loc nil "compile")))
(should (cdr (find-function-search-for-symbol
'c-mode-hook 'defvar "cc-mode"))))
(let ((trusted-content
(list (abbreviate-file-name (find-library-name "compile"))
(abbreviate-file-name (find-library-name "cc-mode")))))
(should (cdr (find-function-search-for-symbol
#'compilation--message->loc nil "compile")))
(should (cdr (find-function-search-for-symbol
'c-mode-hook 'defvar "cc-mode")))))
(provide 'find-func-tests)
;;; find-func-tests.el ends here