Commit 9ab80679 authored by Dave Love's avatar Dave Love

(load-file): Fix last change.

parent 01b91009
......@@ -537,7 +537,7 @@ colon-separated list of directories when resolving a relative directory name."
"Load the Lisp file named FILE."
;; This is a case where .elc makes a lot of sense.
(interactive (list (let ((completion-ignored-extensions
(delete ".elc" completion-ignored-extensions)))
(remove ".elc" completion-ignored-extensions)))
(read-file-name "Load file: "))))
(load (expand-file-name file) nil nil t))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment