summaryrefslogtreecommitdiffstats
path: root/Bugzilla/Quantum/CGI.pm
diff options
context:
space:
mode:
authorDylan William Hardison <dylan@hardison.net>2018-10-01 18:03:41 +0200
committerGitHub <noreply@github.com>2018-10-01 18:03:41 +0200
commitdd5c0861db83e58ae7f507b4ecfc564d96792cb8 (patch)
tree7c0f44689a0cd3c1c122342ba7861cb6c72e8e6e /Bugzilla/Quantum/CGI.pm
parent7e6845e954da409b07d9e8ccb8c1e1ea6df6cfde (diff)
downloadbugzilla-dd5c0861db83e58ae7f507b4ecfc564d96792cb8.tar.gz
bugzilla-dd5c0861db83e58ae7f507b4ecfc564d96792cb8.tar.xz
Bug 1495071 - Mojolicious Cleanup
There are some things that should've been in the first patch but were missed: 1. Calling $c->finish in the finally block should not happen if an exception has been raised. 2. Bugzilla->cleanup() should be called at the same time the mojolicious stash is cleared. 3. Code referencing the shutdownhtml should be removed 4. The conditionals that ran code in Bugzilla.pm when it was not run under mod_perl should instead check where the Bugzilla.pm module was loaded from. 5. Revert the default template from #770 6. Also removed some stuff that manipulates the PATH and signals, which we shouldn't do
Diffstat (limited to 'Bugzilla/Quantum/CGI.pm')
-rw-r--r--Bugzilla/Quantum/CGI.pm13
1 files changed, 11 insertions, 2 deletions
diff --git a/Bugzilla/Quantum/CGI.pm b/Bugzilla/Quantum/CGI.pm
index 0a74f1ee5..945a87d5b 100644
--- a/Bugzilla/Quantum/CGI.pm
+++ b/Bugzilla/Quantum/CGI.pm
@@ -58,16 +58,20 @@ sub load_one {
local *STDIN; ## no critic (local)
open STDIN, '<', $stdin->path or die "STDIN @{[$stdin->path]}: $!" if -s $stdin->path;
tie *STDOUT, 'Bugzilla::Quantum::Stdout', controller => $c; ## no critic (tie)
+
+ # the finally block calls cleanup.
+ $c->stash->{cleanup_guard}->dismiss;
try {
Bugzilla->init_page();
$inner->();
}
catch {
- die $_ unless ref $_ eq 'ARRAY' && $_->[0] eq "EXIT\n";
+ die $_ unless _is_exit($_);
}
finally {
+ my $error = shift;
untie *STDOUT;
- $c->finish;
+ $c->finish if !$error || _is_exit($error);
Bugzilla->cleanup;
CGI::initialize_globals();
};
@@ -157,4 +161,9 @@ sub _file_to_method {
return $name;
}
+sub _is_exit {
+ my ($error) = @_;
+ return ref $error eq 'ARRAY' && $error->[0] eq "EXIT\n";
+}
+
1;