diff options
| author | Robert Pluim <rpluim@gmail.com> | 2024-07-18 09:05:53 +0200 |
|---|---|---|
| committer | Robert Pluim <rpluim@gmail.com> | 2024-07-18 09:05:53 +0200 |
| commit | da97096fdbb50bf69348813c960eb8d10b2bdc44 (patch) | |
| tree | aa6805be2ede7297ca816384ea2a1274360f8df3 /lisp/emacs-lisp/find-func.el | |
| parent | d31b202377ed844c1ecc405ffb879c03d5552d6b (diff) | |
| download | emacs-da97096fdbb50bf69348813c960eb8d10b2bdc44.tar.gz emacs-da97096fdbb50bf69348813c960eb8d10b2bdc44.tar.bz2 emacs-da97096fdbb50bf69348813c960eb8d10b2bdc44.zip | |
; fix previous find-function change
Diffstat (limited to 'lisp/emacs-lisp/find-func.el')
| -rw-r--r-- | lisp/emacs-lisp/find-func.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/find-func.el b/lisp/emacs-lisp/find-func.el index a320a00608d..c1835feff18 100644 --- a/lisp/emacs-lisp/find-func.el +++ b/lisp/emacs-lisp/find-func.el @@ -354,13 +354,13 @@ if non-nil)." (setq def nil)) (completing-read (format-prompt "Library name" def) table nil nil nil - find-function--read-history-library def)) + 'find-function--read-history-library def)) (let ((files (read-library-name--find-files dirs suffixes))) (when (and def (not (member def files))) (setq def nil)) (completing-read (format-prompt "Library name" def) files nil t nil - find-function--read-history-library def))))) + 'find-function--read-history-library def))))) (defun read-library-name--find-files (dirs suffixes) "Return a list of all files in DIRS that match SUFFIXES." |