diff src/fileio.c @ 3598:3c4b5489d2b4

* fileio.c (Frename_file): Pass all arguments to the file name handler. * eval.c (call4): New function.
author Jim Blandy <jimb@redhat.com>
date Thu, 10 Jun 1993 05:21:01 +0000
parents 95021dcb923b
children 309c27256ceb
line wrap: on
line diff
--- a/src/fileio.c	Wed Jun 09 20:28:35 1993 +0000
+++ b/src/fileio.c	Thu Jun 10 05:21:01 1993 +0000
@@ -1748,7 +1748,8 @@
      call the corresponding file handler.  */
   handler = Ffind_file_name_handler (filename);
   if (!NILP (handler))
-    return call3 (handler, Qrename_file, filename, newname);
+    return call4 (handler, Qrename_file,
+		  filename, newname, ok_if_already_exists);
 
   if (NILP (ok_if_already_exists)
       || XTYPE (ok_if_already_exists) == Lisp_Int)