From da97096fdbb50bf69348813c960eb8d10b2bdc44 Mon Sep 17 00:00:00 2001 From: Robert Pluim Date: Thu, 18 Jul 2024 09:05:53 +0200 Subject: [PATCH] ; fix previous find-function change --- lisp/emacs-lisp/find-func.el | 4 ++-- 1 file 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."