X-Git-Url: http://www.git.stargrave.org/?a=blobdiff_plain;f=script%2Fpublic-inbox-httpd;h=09da505e5028952a60551f7bd2ffc25cf57c7780;hb=62f28026e624ed30d620063a0fa92cbedb7f6673;hp=8ba42c2f43e1d503b93480a8517db1eb7693faa9;hpb=193e9a586d49fb111fd201f491b1ad0be4e386b3;p=public-inbox.git diff --git a/script/public-inbox-httpd b/script/public-inbox-httpd index 8ba42c2f..09da505e 100755 --- a/script/public-inbox-httpd +++ b/script/public-inbox-httpd @@ -1,15 +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::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