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

fix Log::Log4perl line reporting

Browse source
This commit is contained in:
Colin Kuskie 2008-07-24 16:38:28 +00:00
parent 48c1c7814b
commit 026e77663e
2 changed files with 3 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

7
lib/WebGUI/Session/ErrorHandler.pm
View file

@ -160,7 +160,6 @@ Deconstructor.
sub DESTROY {
my $self = shift;
$Log::Log4perl::caller_depth--;
undef $self;
}
@ -302,10 +301,8 @@ An active WebGUI::Session object.
sub new {
my $class = shift;
my $session = shift;
unless (Log::Log4perl->initialized()) {
$Log::Log4perl::caller_depth++;
Log::Log4perl->init( $session->config->getWebguiRoot."/etc/log.conf" );
}
$Log::Log4perl::caller_depth=1;
Log::Log4perl->init_once( $session->config->getWebguiRoot."/etc/log.conf" );
my $logger = Log::Log4perl->get_logger($session->config->getFilename);
bless {_queryCount=>0, _logger=>$logger, _session=>$session}, $class;
}