oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

remove redundant logger

Browse source
This commit is contained in:
Graham Knop 2010-04-16 07:27:25 -05:00
parent f2ce1eff85
commit 8c3ecce95f
1 changed files with 0 additions and 31 deletions
Download patch file Download diff file Expand all files Collapse all files

31
lib/Plack/Middleware/Debug/WgLogger.pm
View file

@ -1,31 +0,0 @@
package Plack::Middleware::Debug::WgLogger;
use strict;
use parent qw(Plack::Middleware::Debug::Base);
our $VERSION = '0.07';
# This will be moved to the WebGUI::Middleware::Debug::WgLogger namespace
# once Plack::Middleware::Debug supports that
sub run {
my ($self, $env, $panel) = @_;
my $logger = $env->{'psgix.logger'};
my $log_output = [];
$env->{'psgix.logger'} = sub {
my $args = shift;
push @$log_output, $args->{level} => $args->{message};
$logger && $logger->($args);
};
delete $env->{'webgui.session'}->{_errorHandler};
return sub {
my $res = shift;
$panel->nav_subtitle(scalar @$log_output . " messages");
$panel->content($self->render_list_pairs($log_output));
};
}
sub panel_name { 'WebGUI Log' }
1;