--- trunk/lib/WebPAC/Common.pm	2005/07/24 15:03:11	31
+++ trunk/lib/WebPAC/Common.pm	2005/07/24 15:07:56	32
@@ -176,7 +176,7 @@
 _log4perl_
 		warn "# $name is using debug logger\n" if ($log_debug);
 	} elsif ($name !~ m/Test::Exception/o) {
-		warn "# disabled logging for Text::Exception\n";
+		warn "# disabled logging for Text::Exception\n" if ($log_debug);
 	} elsif ($file) {
 		warn "# $name is using $file logger\n" if ($log_debug);
 		Log::Log4perl->init($file);