@@ -, +, @@ Plack::App::CGIBin instance --- debian/templates/plack.psgi | 6 +++--- misc/plack/koha.psgi | 2 +- 2 files changed, 4 insertions(+), 4 deletions(-) --- a/debian/templates/plack.psgi +++ a/debian/templates/plack.psgi @@ -51,15 +51,15 @@ use CGI qw(-utf8 ); # we will loose -utf8 under plack, otherwise my $intranet = Plack::App::CGIBin->new( root => '/usr/share/koha/intranet/cgi-bin' -); +)->to_app; my $opac = Plack::App::CGIBin->new( root => '/usr/share/koha/opac/cgi-bin/opac' -); +)->to_app; # my $api = Plack::App::CGIBin->new( # root => '/usr/share/koha/api/' -# ); +# )->to_app; builder { --- a/misc/plack/koha.psgi +++ a/misc/plack/koha.psgi @@ -65,7 +65,7 @@ sub watch_for_size { my $CGI_ROOT = $ENV{INTRANET} ? $ENV{INTRANETDIR} : $ENV{OPACDIR}; warn "# using Koha ", $ENV{INTRANET} ? 'intranet' : 'OPAC', " CGI from $CGI_ROOT\n"; -my $app=Plack::App::CGIBin->new(root => $CGI_ROOT); +my $app=Plack::App::CGIBin->new(root => $CGI_ROOT)->to_app; my $home = sub { return [ 302, [ Location => '/cgi-bin/koha/' . ( $ENV{INTRANET} ? 'mainpage.pl' : 'opac-main.pl' ) ] ]; }; --