mid-way commit
This commit is contained in:
parent
5f549b1305
commit
158124cf37
6 changed files with 92 additions and 79 deletions
|
|
@ -1,28 +0,0 @@
|
|||
package Plack::Middleware::WebGUI;
|
||||
use strict;
|
||||
use warnings;
|
||||
use base qw/Plack::Middleware/;
|
||||
|
||||
__PACKAGE__->mk_accessors('root', 'config');
|
||||
|
||||
=head1 NAME
|
||||
|
||||
Plack::Middleware::WebGUI
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Plack Middleware that populates $env
|
||||
|
||||
=cut
|
||||
|
||||
sub call {
|
||||
my $self = shift;
|
||||
my $env = shift;
|
||||
|
||||
$env->{'wg.WEBGUI_ROOT'} = $self->root;
|
||||
$env->{'wg.WEBGUI_CONFIG'} = $self->config;
|
||||
|
||||
$self->app->($env);
|
||||
}
|
||||
|
||||
1;
|
||||
Loading…
Add table
Add a link
Reference in a new issue