From: Richard M. Stallman <rms@gnu.org>
Date: Wed, 14 Sep 1994 09:15:46 +0000 (+0000)
Subject: (delete_temp_file): Use Fdelete_file.
X-Git-Tag: emacs-19.34~7117
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=59750d69f8e43ccf753badbebef933db7638b771;p=emacs.git

(delete_temp_file): Use Fdelete_file.
---

diff --git a/src/callproc.c b/src/callproc.c
index 990a48c4db9..1da4b4d5781 100644
--- a/src/callproc.c
+++ b/src/callproc.c
@@ -467,7 +467,9 @@ static Lisp_Object
 delete_temp_file (name)
      Lisp_Object name;
 {
-  unlink (XSTRING (name)->data);
+  /* Use Fdelete_file because that runs a file name handler.
+     We did that when writing the file, so we should do so when deleting.  */
+  Fdelete_file (name);
 }
 
 DEFUN ("call-process-region", Fcall_process_region, Scall_process_region,