vitalif
/
bugzilla-4intranet
mirror of https://github.com/vitalif/bugzilla-4intranet
1
0
Fork 0
Code Issues Releases Wiki Activity

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-67ecbb4d7f56
master
vfilippov 2010-12-15 18:20:20 +00:00
parent 47ed45d5cb
commit 321cb734d8
2 changed files with 11 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
Bugzilla.pm
View File

@ -124,10 +124,6 @@ my $re_encoded_word = qr{
my $re_especials = qr{$re_encoded_word}xo;
# >>>
undef &Encode::MIME::Header::encode;
*Encode::MIME::Header::encode = *encode_mime_header;
sub encode_mime_header($$;$) {
my ( $obj, $str, $chk ) = @_;
my @line = ();
@ -161,6 +157,7 @@ sub encode_mime_header($$;$) {
return join( "\n", @line );
}
*Encode::MIME::Header::encode = *Bugzilla::encode_mime_header;
}
#####################################################################

10
mod_perl.pl
View File

@ -119,6 +119,16 @@ sub handler : method {
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;
# To reload Perl modules on-the-fly (debug purposes),