Bug 58633 - Show KittenError instead of "Internal error" even on *.cgi compile errors
git-svn-id: svn://svn.office.custis.ru/3rdparty/bugzilla.org/trunk@1179 6955db30-a419-402b-8a0d-67ecbb4d7f56master
parent
47ed45d5cb
commit
321cb734d8
|
@ -124,10 +124,6 @@ my $re_encoded_word = qr{
|
||||||
my $re_especials = qr{$re_encoded_word}xo;
|
my $re_especials = qr{$re_encoded_word}xo;
|
||||||
# >>>
|
# >>>
|
||||||
|
|
||||||
undef &Encode::MIME::Header::encode;
|
|
||||||
|
|
||||||
*Encode::MIME::Header::encode = *encode_mime_header;
|
|
||||||
|
|
||||||
sub encode_mime_header($$;$) {
|
sub encode_mime_header($$;$) {
|
||||||
my ( $obj, $str, $chk ) = @_;
|
my ( $obj, $str, $chk ) = @_;
|
||||||
my @line = ();
|
my @line = ();
|
||||||
|
@ -161,6 +157,7 @@ sub encode_mime_header($$;$) {
|
||||||
return join( "\n", @line );
|
return join( "\n", @line );
|
||||||
}
|
}
|
||||||
|
|
||||||
|
*Encode::MIME::Header::encode = *Bugzilla::encode_mime_header;
|
||||||
}
|
}
|
||||||
|
|
||||||
#####################################################################
|
#####################################################################
|
||||||
|
|
10
mod_perl.pl
10
mod_perl.pl
|
@ -119,6 +119,16 @@ sub handler : method {
|
||||||
return $class->SUPER::handler(@_);
|
return $class->SUPER::handler(@_);
|
||||||
}
|
}
|
||||||
|
|
||||||
|
sub error_check
|
||||||
|
{
|
||||||
|
my $self = shift;
|
||||||
|
if ($@ && !(ref $@ eq 'APR::Error' && $@ == ModPerl::EXIT))
|
||||||
|
{
|
||||||
|
die $@;
|
||||||
|
}
|
||||||
|
return $self->SUPER::error_check(@_);
|
||||||
|
}
|
||||||
|
|
||||||
my $STATS;
|
my $STATS;
|
||||||
|
|
||||||
# To reload Perl modules on-the-fly (debug purposes),
|
# To reload Perl modules on-the-fly (debug purposes),
|
||||||
|
|
Loading…
Reference in New Issue