--- trunk/run.pl	2007/11/03 12:35:42	978
+++ trunk/run.pl	2007/11/28 11:14:44	1075
@@ -153,6 +153,8 @@
 
 my $config = new WebPAC::Config( path => $config_path );
 
+WebPAC::Normalize::_debug( $debug - 1 ) if $debug > 1;
+
 #print "config = ",dump($config) if ($debug);
 
 die "no databases in config file!\n" unless ($config->databases);
@@ -329,9 +331,11 @@
 
 		$log->debug("calling $module->new(",dump( $output ),")");
 		my $out = new $module->new( $output );
-		$out->init;
-
-		push @output_modules, $out;
+		if ( $out->init ) {
+			push @output_modules, $out;
+		} else {
+			$log->warn("SKIPPED $module");
+		}
 	}
 
 
@@ -365,7 +369,7 @@
 
 		my @lookups = $parser->have_lookup_create($database, $input);
 
-		$log->info("working on input '$input_name' in $input->{path} [type: $input->{type}] using $input_module",
+		$log->info("working on $database/$input_name with $input_module on $input->{path}",
 			@lookups ? " creating lookups: ".join(", ", @lookups) : ""
 		);
 
@@ -600,11 +604,11 @@
 			if ($marc) {
 				my $i = 0;
 
-				while (my $fields = WebPAC::Normalize::_get_marc_fields( fetch_next => 1 ) ) {
+				while (my $fields = WebPAC::Normalize::MARC::_get_marc_fields( fetch_next => 1 ) ) {
 					$marc->add(
 						id => $mfn . ( $i ? "/$i" : '' ),
 						fields => $fields,
-						leader => WebPAC::Normalize::_get_marc_leader(),
+						leader => WebPAC::Normalize::MARC::_get_marc_leader(),
 						row => $row,
 					);
 					$i++;