/[webpac2]/trunk/run.pl
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /trunk/run.pl

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 742 by dpavlin, Sun Oct 8 00:38:10 2006 UTC revision 755 by dpavlin, Sun Oct 8 20:28:17 2006 UTC
# Line 7  use File::Temp qw/tempdir/; Line 7  use File::Temp qw/tempdir/;
7  use lib './lib';  use lib './lib';
8    
9  use WebPAC::Common 0.02;  use WebPAC::Common 0.02;
10  use WebPAC::Parser 0.07;  use WebPAC::Parser 0.08;
11  use WebPAC::Input 0.13;  use WebPAC::Input 0.13;
12  use WebPAC::Store 0.11;  use WebPAC::Store 0.11;
13  use WebPAC::Normalize 0.22;  use WebPAC::Normalize 0.22;
# Line 198  while (my ($database, $db_config) = each Line 198  while (my ($database, $db_config) = each
198          }          }
199    
200          my $indexer;          my $indexer;
201          if ($use_indexer) {          if ($use_indexer && $parser->have_rules( 'search', $database )) {
202    
203                  my $cfg_name = $use_indexer;                  my $cfg_name = $use_indexer;
204                  $cfg_name =~ s/\-.*$//;                  $cfg_name =~ s/\-.*$//;
# Line 408  while (my ($database, $db_config) = each Line 408  while (my ($database, $db_config) = each
408                  }                  }
409    
410                  my $marc;                  my $marc;
411                  if ($parser->generate_marc( $database, $input_name )) {                  if ($parser->have_rules( 'marc', $database, $input_name )) {
412                          $marc = new WebPAC::Output::MARC(                          $marc = new WebPAC::Output::MARC(
413                                  path => "out/marc/${database}-${input_name}.marc",                                  path => "out/marc/${database}-${input_name}.marc",
414                                  lint => $marc_lint,                                  lint => $marc_lint,
Legend:
Removed from v.742  
changed lines
  Added in v.755
  ViewVC Help
Powered by ViewVC 1.1.26