--- trunk/t/3-normalize-marc.t	2007/11/12 11:10:48	1036
+++ trunk/t/3-normalize-marc.t	2007/11/12 11:17:19	1037
@@ -11,6 +11,8 @@
 	use_ok( 'WebPAC::Normalize::MARC' );
 }
 
+_debug( $debug - 1 ) if $debug > 1;
+
 my $rec = {
 	'225' => [{
 		'a' => 'a-1-1',