From: Gerd Moellmann <gerd@gnu.org>
Date: Wed, 10 Nov 1999 12:11:55 +0000 (+0000)
Subject: (file-local-copy): Remove optional BUFFER argument
X-Git-Tag: emacs-pretest-21.0.90~6138
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=e178969580b48e940a91569893ee2f87ab9ce49f;p=emacs.git

(file-local-copy): Remove optional BUFFER argument
because that's not used by anything.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 12b0f725547..9165cb9e168 100644
--- 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 731f12339f9..3c3aeed60d9 100644
--- 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)