X-Git-Url: http://www.git.stargrave.org/?a=blobdiff_plain;f=script%2Fpublic-inbox-httpd;h=09da505e5028952a60551f7bd2ffc25cf57c7780;hb=2fc67a18b7ccd75ea6eb945f18203cbf4bcf228f;hp=43f1818861ed1d10f0032ec3891029e4ff79a2c3;hpb=3d41aa23f35501ca92aab8aa42980fa73f7fa74f;p=public-inbox.git diff --git a/script/public-inbox-httpd b/script/public-inbox-httpd index 43f18188..09da505e 100755 --- a/script/public-inbox-httpd +++ b/script/public-inbox-httpd @@ -1,15 +1,18 @@ #!/usr/bin/perl -w -# Copyright (C) 2016-2018 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::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 { @@ -21,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', @@ -32,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