Commit e1789695 authored by Gerd Moellmann's avatar Gerd Moellmann
Browse files

(file-local-copy): Remove optional BUFFER argument

because that's not used by anything.
parent 765712a7
1999-11-10 Gerd Moellmann <gerd@gnu.org> 1999-11-10 Gerd Moellmann <gerd@gnu.org>
* files.el (file-local-copy): Remove optional BUFFER argument
because that's not used by anything.
* mail/mh-comp.el (mh-smail-batch): If TO is nil, use "" as * mail/mh-comp.el (mh-smail-batch): If TO is nil, use "" as
to-address. to-address.
......
...@@ -501,10 +501,12 @@ This is an interface to the function `load'." ...@@ -501,10 +501,12 @@ This is an interface to the function `load'."
(interactive "sLoad library: ") (interactive "sLoad library: ")
(load library)) (load library))
(defun file-local-copy (file &optional buffer) (defun file-local-copy (file)
"Copy the file FILE into a temporary file on this machine. "Copy the file FILE into a temporary file on this machine.
Returns the name of the local copy, or nil, if FILE is directly Returns the name of the local copy, or nil, if FILE is directly
accessible." accessible."
;; This formerly had an optional BUFFER argument that wasn't used by
;; anything.
(let ((handler (find-file-name-handler file 'file-local-copy))) (let ((handler (find-file-name-handler file 'file-local-copy)))
(if handler (if handler
(funcall handler 'file-local-copy file) (funcall handler 'file-local-copy file)
......
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