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 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); |