1 files changed, 6 insertions, 1 deletions

diff --git a/src/process.c b/src/process.c
index 26d40c26cd5..84d373ff37b 100644
--- a/src/process.c
+++ b/src/process.c
@@ -5113,6 +5113,7 @@ send_process_trap ()
   sigrelse (SIGPIPE);
   sigrelse (SIGALRM);
 #endif /* BSD4_1 */
+  sigunblock (sigmask (SIGPIPE));
   longjmp (send_process_frame, 1);
 }
 
@@ -5297,7 +5298,11 @@ send_process (proc, buf, len, object)
                                0, datagram_address[outfd].sa,
                                datagram_address[outfd].len);
                   if (rv < 0 && errno == EMSGSIZE)
-                    report_file_error ("sending datagram", Fcons (proc, Qnil));
+                    {
+                      signal (SIGPIPE, old_sigpipe);
+                      report_file_error ("sending datagram",
+                                         Fcons (proc, Qnil));
+                    }
                 }
               else
 #endif