diff options
Diffstat (limited to 'lisp/subr.el')
| -rw-r--r-- | lisp/subr.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/subr.el b/lisp/subr.el index d81dfae4575..1f6d5580bff 100644 --- a/lisp/subr.el +++ b/lisp/subr.el @@ -1487,8 +1487,9 @@ When called from a program, the file name is normaly returned as a string. When run interactively, the argument INTERACTIVE-CALL is t, and the file name is displayed in the echo area." (interactive (list (completing-read "Locate library: " - 'locate-file-completion - (cons load-path (get-load-suffixes))) + (apply-partially + 'locate-file-completion-table + load-path (get-load-suffixes))) nil nil t)) (let ((file (locate-file library |