script/gitalist_app.psgi

   1 #!/usr/bin/perl
   2
   3 use strict;
   4
   5 use FindBin;
   6 BEGIN {
   7     my $env = "$FindBin::Bin/env";
   8     if (-r $env) {
   9         do $env or die $@;
  10     }
  11 }
  12
  13 use Gitalist;
  14 use Plack::Builder;
  15
  16 Gitalist->setup_engine('PSGI');
  17 my $app = sub { Gitalist->run(@_) };
  18
  19 builder { $app };