From 1ddc85a489edb9291d2dabeadd95eaec49e05855 Mon Sep 17 00:00:00 2001
From: Dave Love <fx@gnu.org>
Date: Tue, 7 Nov 2000 18:12:12 +0000
Subject: [PATCH] (Fcall_process_region): Use HAVE_MKSTEMP.

---
 src/callproc.c | 11 +++++++++++
 1 file changed, 11 insertions(+)

diff --git a/src/callproc.c b/src/callproc.c
index bf2fabcc75..9ba459f992 100644
--- a/src/callproc.c
+++ b/src/callproc.c
@@ -967,7 +967,18 @@ If you quit, the process is killed with SIGINT, or SIGKILL if you quit again.")
 
   coding_systems = Qt;
 
+#ifdef HAVE_MKSTEMP
+ {
+   int fd = mkstemp (tempfile);
+   if (fd == -1)
+     report_file_error ("Failed to open temporary file",
+			Fcons (Vtemp_file_name_pattern, Qnil));
+   else
+     close (fd);
+ }
+#else
   mktemp (tempfile);
+#endif
 
   filename_string = build_string (tempfile);
   GCPRO1 (filename_string);
-- 
2.20.1