We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
2 parents 3919d40 + 5ed2ec1 commit 5bfd536Copy full SHA for 5bfd536
1 file changed
gitweb/gitweb.perl
@@ -1109,6 +1109,15 @@ sub run {
1109
1110
run();
1111
1112
+if (defined caller) {
1113
+ # wrapped in a subroutine processing requests,
1114
+ # e.g. mod_perl with ModPerl::Registry, or PSGI with Plack::App::WrapCGI
1115
+ return;
1116
+} else {
1117
+ # pure CGI script, serving single request
1118
+ exit;
1119
+}
1120
+
1121
## ======================================================================
1122
## action links
1123
0 commit comments