]> Sergey Matveev's repositories - public-inbox.git/blobdiff - script/public-inbox.cgi
No ext_urls
[public-inbox.git] / script / public-inbox.cgi
index 5b2aefe2311b1ab5e5e21e49bb60ade4a41fc5d6..3a430d5b94b320fa1fc3145e288d145a28ad1468 100755 (executable)
@@ -1,26 +1,22 @@
 #!/usr/bin/perl -w
-# Copyright (C) 2014-2016 all contributors <meta@public-inbox.org>
+# Copyright (C) 2014-2021 all contributors <meta@public-inbox.org>
 # License: AGPL-3.0+ or later <https://www.gnu.org/licenses/agpl-3.0.txt>
 #
 # 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 X-Forwarded-For and X-Forwarded-Proto request headers.
+       # sets the X-Forwarded-Proto request header.
        # See Plack::Middleware::ReverseProxy documentation for details
        # enable 'ReverseProxy';