[catagits/Gitalist.git] / script / gitalist_app.psgi

#!/usr/bin/perl

use strict;

use FindBin;
BEGIN {
    my $env = "$FindBin::Bin/env";
    if (-r $env) {
        do $env or die $@;
    }
}

use Gitalist;
use Plack::Builder;

Gitalist->setup_engine('PSGI');
my $app = sub { Gitalist->run(@_) };

builder { $app };
Commit	Line	Data
cc02cf5a	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 };