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

because that's not used by anything.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 12b0f72554755c9c8444a1278085a89198cb1b60..9165cb9e1680d0153f7de2b983e23b11931d6684 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -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.
 

diff --git a/lisp/files.el b/lisp/files.el
index 731f12339f9e6869ae2980acb4e99f03fdf2bcce..3c3aeed60d9392b41ca00ebb767038d6ac571d20 100644 (file)
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -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)