* [PATCH] www: enable and expand preload from mod_perl2
@ 2015-08-22 5:09 7% Eric Wong
0 siblings, 0 replies; 1+ results
From: Eric Wong @ 2015-08-22 5:09 UTC (permalink / raw)
To: meta
Hopefully this saves us some memory with CoW on *nix.
---
lib/PublicInbox/WWW.pm | 7 +++++++
public-inbox.cgi | 7 +++++--
2 files changed, 12 insertions(+), 2 deletions(-)
diff --git a/lib/PublicInbox/WWW.pm b/lib/PublicInbox/WWW.pm
index 2de5471..54f6399 100644
--- a/lib/PublicInbox/WWW.pm
+++ b/lib/PublicInbox/WWW.pm
@@ -77,10 +77,17 @@ sub preload {
require PublicInbox::Feed;
require PublicInbox::View;
require PublicInbox::Thread;
+ require PublicInbox::GitCatFile;
require Email::MIME;
require Digest::SHA;
require POSIX;
require XML::Atom::SimpleFeed;
+
+ eval {
+ require PublicInbox::Search;
+ require PublicInbox::Mbox;
+ require IO::Compress::Gzip;
+ };
}
# private functions below
diff --git a/public-inbox.cgi b/public-inbox.cgi
index 63663f3..75d510c 100755
--- a/public-inbox.cgi
+++ b/public-inbox.cgi
@@ -4,13 +4,16 @@
use strict;
use warnings;
use IO::Handle;
-require PublicInbox::WWW;
+use PublicInbox::WWW;
use CGI qw/-nosticky/;
our $NO_SCRIPT_NAME;
our %HTTP_CODES;
BEGIN {
$NO_SCRIPT_NAME = 1 if $ENV{NO_SCRIPT_NAME};
- CGI->compile if $ENV{MOD_PERL};
+ if ($ENV{MOD_PERL}) {
+ CGI->compile;
+ PublicInbox::WWW->preload;
+ }
%HTTP_CODES = (
200 => 'OK',
--
EW
^ permalink raw reply related [relevance 7%]
Results 1-1 of 1 | reverse | options above
-- pct% links below jump to the message on this page, permalinks otherwise --
2015-08-22 5:09 7% [PATCH] www: enable and expand preload from mod_perl2 Eric Wong
Code repositories for project(s) associated with this public inbox
https://80x24.org/public-inbox.git
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).