X-Git-Url: http://www.git.stargrave.org/?p=public-inbox.git;a=blobdiff_plain;f=script%2Fpublic-inbox.cgi;h=3a430d5b94b320fa1fc3145e288d145a28ad1468;hp=62eae8eb75c972da588ed0f8b8803fc2f8e4a7ba;hb=refs%2Fheads%2Fmaster;hpb=3d41aa23f35501ca92aab8aa42980fa73f7fa74f diff --git a/script/public-inbox.cgi b/script/public-inbox.cgi index 62eae8eb..3a430d5b 100755 --- a/script/public-inbox.cgi +++ b/script/public-inbox.cgi @@ -1,23 +1,19 @@ #!/usr/bin/perl -w -# Copyright (C) 2014-2018 all contributors +# Copyright (C) 2014-2021 all contributors # License: AGPL-3.0+ or later # # Enables using PublicInbox::WWW as a CGI script use strict; -use warnings; -use Plack::Builder; -use Plack::Handler::CGI; -use PublicInbox::WWW; -BEGIN { PublicInbox::WWW->preload if $ENV{MOD_PERL} } +BEGIN { + for (qw(Plack::Builder Plack::Handler::CGI)) { + eval("require $_") or die "E: Plack is required for $0\n"; + } + Plack::Builder->import; + require PublicInbox::WWW; + PublicInbox::WWW->preload if $ENV{MOD_PERL}; +} my $www = PublicInbox::WWW->new; -my $have_deflater = eval { require Plack::Middleware::Deflater; 1 }; my $app = builder { - if ($have_deflater) { - enable 'Deflater', - content_type => [ 'text/html', 'text/plain', - 'application/atom+xml' ]; - } - # Enable to ensure redirects and Atom feed URLs are generated # properly when running behind a reverse proxy server which # sets the X-Forwarded-Proto request header.