X-Git-Url: http://www.git.stargrave.org/?a=blobdiff_plain;f=script%2Fpublic-inbox-httpd;h=09da505e5028952a60551f7bd2ffc25cf57c7780;hb=7c5ac90b309bbe76468055e8a9289664ef2dfe37;hp=f19582fafc600ccea7730ed98f45533ff8381ad6;hpb=bb38f0fcce73904e68d4cde8f9d85e9da2e93013;p=public-inbox.git
diff --git a/script/public-inbox-httpd b/script/public-inbox-httpd
index f19582fa..09da505e 100755
--- a/script/public-inbox-httpd
+++ b/script/public-inbox-httpd
@@ -1,16 +1,18 @@
#!/usr/bin/perl -w
-# Copyright (C) 2016 all contributors
+# Copyright (C) 2016-2020 all contributors
# License: AGPL-3.0+
#
# Standalone HTTP server for public-inbox.
use strict;
-use warnings;
-use Plack::Util;
use PublicInbox::Daemon;
-use PublicInbox::HTTP;
-use PublicInbox::HTTPD;
-use Plack::Request;
-use Plack::Builder;
+BEGIN {
+ for (qw(Plack::Builder Plack::Util)) {
+ eval("require $_") or die "E: Plack is required for $0\n";
+ }
+ Plack::Builder->import;
+ require PublicInbox::HTTP;
+ require PublicInbox::HTTPD;
+}
my %httpds;
my $app;
my $refresh = sub {
@@ -22,8 +24,8 @@ my $refresh = sub {
}
} else {
require PublicInbox::WWW;
- PublicInbox::WWW->preload;
my $www = PublicInbox::WWW->new;
+ $www->preload;
$app = builder {
eval {
enable 'Deflater',
@@ -33,8 +35,6 @@ my $refresh = sub {
application/atom+xml
)]
};
- $@ and warn
-"Plack::Middleware::Deflater missing, bandwidth will be wasted\n";
eval { enable 'ReverseProxy' };
$@ and warn