From 963a290ad2d9a89b45b66ac9d9ccdd612a756f11 Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Mon, 25 Jan 1999 12:26:17 +0000
Subject: yet more mod_perl stuff

---
 site_perl/svc_Common.pm | 9 +++++++--
 1 file changed, 7 insertions(+), 2 deletions(-)

(limited to 'site_perl/svc_Common.pm')

diff --git a/site_perl/svc_Common.pm b/site_perl/svc_Common.pm
index e516e0065..9c0c4e69f 100644
--- a/site_perl/svc_Common.pm
+++ b/site_perl/svc_Common.pm
@@ -46,6 +46,7 @@ sub insert {
   local $SIG{QUIT} = 'IGNORE';
   local $SIG{TERM} = 'IGNORE';
   local $SIG{TSTP} = 'IGNORE';
+  local $SIG{PIPE} = 'IGNORE';
 
   $error = $self->check;
   return $error if $error;
@@ -90,6 +91,7 @@ sub delete {
   local $SIG{QUIT} = 'IGNORE';
   local $SIG{TERM} = 'IGNORE';
   local $SIG{TSTP} = 'IGNORE';
+  local $SIG{PIPE} = 'IGNORE';
 
   my $svcnum = $self->svcnum;
 
@@ -163,7 +165,7 @@ sub cancel { ''; }
 
 =head1 VERSION
 
-$Id: svc_Common.pm,v 1.1 1998-12-30 00:30:45 ivan Exp $
+$Id: svc_Common.pm,v 1.2 1999-01-25 12:26:14 ivan Exp $
 
 =head1 BUGS
 
@@ -180,7 +182,10 @@ from the base documentation.
 =head1 HISTORY
 
 $Log: svc_Common.pm,v $
-Revision 1.1  1998-12-30 00:30:45  ivan
+Revision 1.2  1999-01-25 12:26:14  ivan
+yet more mod_perl stuff
+
+Revision 1.1  1998/12/30 00:30:45  ivan
 svc_ stuff is more properly OO - has a common superclass FS::svc_Common
 
 
-- 
cgit v1.2.1