# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 786050861 0
# Node ID 2d7a561cc92cf8b1b310834f6e2794f6875e082c
# Parent  8d3a717364239dfef24424d8893a6d748850bbf1
(delete_temp_file): Use internal_delete_file.

diff -r 8d3a71736423 -r 2d7a561cc92c src/callproc.c
--- a/src/callproc.c	Mon Nov 28 19:27:27 1994 +0000
+++ b/src/callproc.c	Mon Nov 28 19:27:41 1994 +0000
@@ -492,9 +492,9 @@
 delete_temp_file (name)
      Lisp_Object name;
 {
-  /* Use Fdelete_file because that runs a file name handler.
+  /* Use Fdelete_file (indirectly) because that runs a file name handler.
      We did that when writing the file, so we should do so when deleting.  */
-  Fdelete_file (name);
+  internal_delete_file (name);
 }
 
 DEFUN ("call-process-region", Fcall_process_region, Scall_process_region,