--- trunk/run.pl 2006/10/05 14:46:38 738 +++ trunk/run.pl 2006/10/08 20:28:17 755 @@ -7,7 +7,7 @@ use lib './lib'; use WebPAC::Common 0.02; -use WebPAC::Parser 0.07; +use WebPAC::Parser 0.08; use WebPAC::Input 0.13; use WebPAC::Store 0.11; use WebPAC::Normalize 0.22; @@ -198,7 +198,7 @@ } my $indexer; - if ($use_indexer) { + if ($use_indexer && $parser->have_rules( 'search', $database )) { my $cfg_name = $use_indexer; $cfg_name =~ s/\-.*$//; @@ -408,7 +408,7 @@ } my $marc; - if ($parser->generate_marc( $database, $input_name )) { + if ($parser->have_rules( 'marc', $database, $input_name )) { $marc = new WebPAC::Output::MARC( path => "out/marc/${database}-${input_name}.marc", lint => $marc_lint, @@ -487,7 +487,7 @@ }, ); - $log->debug("ds = ",dump($ds)); + $log->debug("ds = ",dump($ds)) if ($ds); $store->save_ds( database => $database,