From 2a300c4d2932eb46503b76b47fc033d954b40e72 Mon Sep 17 00:00:00 2001
From: jeff <jeff>
Date: Mon, 15 Feb 2010 14:41:35 +0000
Subject: [PATCH] get rid of some very annoying and pointless noise

---
 htetc/handler.pl | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/htetc/handler.pl b/htetc/handler.pl
index 952d6203b..e2289a977 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);
 
-- 
2.20.1