# HG changeset patch
# User Eli Zaretskii <eliz@gnu.org>
# Date 1116676729 0
# Node ID 7f6a053bbca42cab7880465d0a80bcedf1f079dc
# Parent  cc4bd3fe9a9da18d5ac446071b739fb01d0084a7
(send_process): Restore the SIGPIPE handler if we catch a SIGPIPE.

diff -r cc4bd3fe9a9d -r 7f6a053bbca4 src/process.c
--- a/src/process.c	Sat May 21 11:48:00 2005 +0000
+++ b/src/process.c	Sat May 21 11:58:49 2005 +0000
@@ -5134,6 +5134,7 @@
   int rv;
   struct coding_system *coding;
   struct gcpro gcpro1;
+  volatile SIGTYPE (*old_sigpipe)();
 
   GCPRO1 (object);
 
@@ -5258,7 +5259,6 @@
       while (len > 0)
 	{
 	  int this = len;
-	  SIGTYPE (*old_sigpipe)();
 
 	  /* Decide how much data we can send in one batch.
 	     Long lines need to be split into multiple batches.  */
@@ -5401,6 +5401,7 @@
 #endif /* not VMS */
   else
     {
+      signal (SIGPIPE, old_sigpipe);
 #ifndef VMS
       proc = process_sent_to;
       p = XPROCESS (proc);