--- trunk/lib/WebPAC/Common.pm	2006/01/08 20:27:01	362
+++ trunk/lib/WebPAC/Common.pm	2006/01/08 20:27:06	363
@@ -205,9 +205,9 @@
 	my $name = (caller(2))[3] || caller;
 	$self->{'_logger_'} ||= $self->_init_logger;
 
-	warn "# get_logger( $name )\n" if ($log_debug);
-
-	return get_logger($name);
+	my $log = get_logger( $name );
+	warn "# get_logger( $name ) level ", $log->level, "\n" if ($log_debug);
+	return $log;
 }