(Fcall_process_region) [HAVE_MKSTEMP]: Add BLOCK_INPUT

around mkstemp.

1 files changed, 5 insertions, 1 deletions

diff --git a/src/callproc.c b/src/callproc.c
index c56d2fb679b..6cbc0cf124f 100644
--- a/src/callproc.c
+++ b/src/callproc.c
@@ -1104,7 +1104,11 @@ usage: (call-process-region START END PROGRAM &optional DELETE BUFFER DISPLAY &r
 
 #ifdef HAVE_MKSTEMP
  {
-   int fd = mkstemp (tempfile);
+   int fd;
+
+   BLOCK_INPUT;
+   fd = mkstemp (tempfile);
+   UNBLOCK_INPUT;
    if (fd == -1)
      report_file_error ("Failed to open temporary file",
                         Fcons (Vtemp_file_name_pattern, Qnil));