# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1116079593 0
# Node ID f9dc4e8a41feb222273ed69b8aaf4ce5b0a6bb47
# Parent  80f8fd5fdea6e2674c6f9cd3af05a38831e149b9
(send_process_trap): Unblock SIGPIPE.
(send_process): Reset SIGPIPE handler before reporting error.

diff -r 80f8fd5fdea6 -r f9dc4e8a41fe src/process.c
--- a/src/process.c	Sat May 14 14:05:59 2005 +0000
+++ b/src/process.c	Sat May 14 14:06:33 2005 +0000
@@ -5108,6 +5108,7 @@
   sigrelse (SIGPIPE);
   sigrelse (SIGALRM);
 #endif /* BSD4_1 */
+  sigunblock (sigmask (SIGPIPE));
   longjmp (send_process_frame, 1);
 }
 
@@ -5299,7 +5300,11 @@
 			       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