www: make interface more OO

[public-inbox.git] / public-inbox-httpd

diff --git a/public-inbox-httpd b/public-inbox-httpd
index 6436bd7df1011cbfbff3e26bb6197d59d54852d7..3635c9a75e804af9b190eda13fed7cd7dab6aeb7 100644 (file)
--- a/public-inbox-httpd
+++ b/public-inbox-httpd
@@ -24,6 +24,7 @@ my $refresh = sub {
 "$0 runs in /, command-line paths must be absolute\n";
                }
        } else {
+               my $www = PublicInbox::WWW->new;
                $app = eval {
                        my $deflate_types = eval {
                                require Plack::Middleware::Deflater;
@@ -37,11 +38,7 @@ my $refresh = sub {
                                                content_type => $deflate_types
                                }
                                enable 'Head';
-                               sub {
-                                       my $req = Plack::Request->new(@_);
-                                       PublicInbox::WWW::run($req,
-                                                       $req->method);
-                               };
+                               sub { $www->call(@_) };
                        };
                };
        }