gitweb: Precompile CGI routines for mod_perl

diff --git a/gitweb/gitweb.perl b/gitweb/gitweb.perl
index a0a614acafe2f346e505ff5e69c21fff07f8e0c0..d845e91e202233916a91a7095e4a81142687c9c7 100755 (executable)
--- a/gitweb/gitweb.perl
+++ b/gitweb/gitweb.perl
@@ -18,6 +18,10 @@
 use File::Basename qw(basename);
 binmode STDOUT, ':utf8';
 
+BEGIN {
+       CGI->compile() if $ENV{MOD_PERL};
+}
+
 our $cgi = new CGI;
 our $version = "++GIT_VERSION++";
 our $my_url = $cgi->url();