if ( $r->filename =~ /\/rt\// ) { #RT
- $ah->interp($rt_interp);
+ # We don't need to handle non-text, non-xml items
+ return -1 if defined( $r->content_type )
+ && $r->content_type !~ m!(^text/|\bxml\b)!io;
+
local $SIG{__WARN__};
local $SIG{__DIE__};
RT::Init();
- # We don't need to handle non-text, non-xml items
- return -1 if defined( $r->content_type )
- && $r->content_type !~ m!(^text/|\bxml\b)!io;
+ $ah->interp($rt_interp);
} else {
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__} );
+ {
+ no warnings 'uninitialized';
+ undef($SIG{__WARN__}) if defined($SIG{__WARN__});
+ undef($SIG{__DIE__}) if defined($SIG{__DIE__} );
+ }
$ah->interp($fs_interp);