Fix 15861: detect the audoload function more robustly

This commit is contained in:
Lin Sun 2023-01-02 18:56:06 +00:00 committed by Maxi Wolff
parent 178a3ab186
commit e043c86163
1 changed files with 1 additions and 1 deletions

View File

@ -1280,7 +1280,7 @@ SEQ, START and END are the same arguments as for `cl-subseq'"
(or (bound-and-true-p org-directory) default-directory))
(files
(if (or (not (fboundp 'org-agenda-files))
(eq 'autoload (car (symbol-function 'org-agenda-files))))
(autoloadp (symbol-function 'org-agenda-files)))
(bound-and-true-p org-agenda-files)
(org-agenda-files))))
(mapcar #'expand-file-name files)))