Change 18017: [PATCH] perlipc.pod

[Rafael Garcia-Suarez]

Change 18017 by rgs@rgs-home on 2002/10/14 20:37:06

        Subject: [PATCH] perlipc.pod
        From: Slaven Rezic <[EMAIL PROTECTED]>
        Date: Sun, 13 Oct 2002 14:26:26 +0200 (CEST)
        Message-Id: <[EMAIL PROTECTED]>

Affected files ...

.... //depot/perl/pod/perlipc.pod#43 edit

Differences ...

==== //depot/perl/pod/perlipc.pod#43 (text) ====
Index: perl/pod/perlipc.pod
--- perl/pod/perlipc.pod#42~17700~      Thu Aug  8 08:02:57 2002
+++ perl/pod/perlipc.pod        Mon Oct 14 13:37:06 2002
@@ -555,7 +555,7 @@
 
     # add error processing as above
     $pid = open(KID_TO_WRITE, "|-");
-    $SIG{ALRM} = sub { die "whoops, $program pipe broke" };
+    $SIG{PIPE} = sub { die "whoops, $program pipe broke" };
 
     if ($pid) {  # parent
        for (@data) {
End of Patch.