diff options
| -rw-r--r-- | htetc/handler.pl | 7 |
1 files 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); |