1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-05 11:45:45 +00:00

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

because that's not used by anything.
This commit is contained in:
Gerd Moellmann 1999-11-10 12:11:55 +00:00
parent 765712a701
commit e178969580
2 changed files with 6 additions and 1 deletions

View File

@ -1,5 +1,8 @@
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
to-address.

View File

@ -501,10 +501,12 @@ This is an interface to the function `load'."
(interactive "sLoad 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.
Returns the name of the local copy, or nil, if FILE is directly
accessible."
;; This formerly had an optional BUFFER argument that wasn't used by
;; anything.
(let ((handler (find-file-name-handler file 'file-local-copy)))
(if handler
(funcall handler 'file-local-copy file)