# Note that this is a raw subroutine, not a method, so $class isn't available.
sub init_page {
+ # This is probably not needed, but bugs resulting from a dirty
+ # request cache are very annoying (see bug 1347335)
+ # and this is not an expensive operation.
+ clear_request_cache();
if (Bugzilla->usage_mode == USAGE_MODE_CMDLINE) {
init_console();
}
AddHandler perl-script .cgi
# No need to PerlModule these because they're already defined in mod_perl.pl
PerlResponseHandler Bugzilla::ModPerl::ResponseHandler
- PerlCleanupHandler Apache2::SizeLimit Bugzilla::ModPerl::CleanupHandler
+ PerlCleanupHandler Bugzilla::ModPerl::CleanupHandler Apache2::SizeLimit
PerlOptions +ParseHeaders
Options +ExecCGI +FollowSymLinks
AllowOverride Limit FileInfo Indexes
$rl->handler($file, $file);
}
+# Some items might already be loaded into the request cache
+# best to make sure it starts out empty.
+# Because of bug 1347335 we also do this in init_page().
+Bugzilla::clear_request_cache();
+
package Bugzilla::ModPerl::ResponseHandler;
use strict;
use base qw(ModPerl::Registry);
my $r = shift;
Bugzilla::_cleanup();
- # Sometimes mod_perl doesn't properly call DESTROY on all
- # the objects in pnotes()
- foreach my $key (keys %{$r->pnotes}) {
- delete $r->pnotes->{$key};
- }
return Apache2::Const::OK;
}