From: jeff <jeff>
Date: Mon, 15 Feb 2010 14:39:13 +0000 (+0000)
Subject: get rid of some very annoying and pointless noise
X-Git-Tag: root_of_svc_elec_features~465
X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=649b07e7ea35f96d814ba1b7020ab07268355ade

get rid of some very annoying and pointless noise
---

diff --git a/htetc/handler.pl b/htetc/handler.pl
index 38af4cc8c..af7ac7d5e 100644
--- a/htetc/handler.pl
+++ b/htetc/handler.pl
@@ -76,8 +76,11 @@ sub handler
       RT::Init() if $RT::VERSION; #for lack of something else
 
       #we don't want the RT error handlers under FS
-      undef($SIG{__WARN__}) if defined($SIG{__WARN__});
-      undef($SIG{__DIE__})  if defined($SIG{__DIE__} );
+      {
+        local $^W = 0;
+        undef($SIG{__WARN__}) if defined($SIG{__WARN__});
+        undef($SIG{__DIE__})  if defined($SIG{__DIE__} );
+      }
 
       $ah->interp($fs_interp);