/[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 672 by dpavlin, Mon Sep 11 20:26:01 2006 UTC revision 674 by dpavlin, Tue Sep 12 14:47:25 2006 UTC
# Line 232  while (my ($database, $db_config) = each Line 232  while (my ($database, $db_config) = each
232                          use WebPAC::Output::EstraierNative;                          use WebPAC::Output::EstraierNative;
233                          $indexer = new WebPAC::Output::EstraierNative( %{ $indexer_config } );                          $indexer = new WebPAC::Output::EstraierNative( %{ $indexer_config } );
234    
                         $use_indexer = 'hyperestraier';  
   
235                  } elsif ($use_indexer eq 'kinosearch') {                  } elsif ($use_indexer eq 'kinosearch') {
236    
237                          # open KinoSearch                          # open KinoSearch
# Line 402  while (my ($database, $db_config) = each Line 400  while (my ($database, $db_config) = each
400                          # reset position in database                          # reset position in database
401                          $input_db->seek(1);                          $input_db->seek(1);
402    
403                            # generate name of config key for indexer (strip everything after -)
404                            my $indexer_config = $use_indexer;
405                            $indexer_config =~ s/^(\w+)-?.*$/$1/g;
406    
407                          foreach my $pos ( 0 ... $input_db->size ) {                          foreach my $pos ( 0 ... $input_db->size ) {
408    
409                                  my $row = $input_db->fetch || next;                                  my $row = $input_db->fetch || next;
# Line 451  while (my ($database, $db_config) = each Line 453  while (my ($database, $db_config) = each
453                                  $indexer->add(                                  $indexer->add(
454                                          id => $input->{name} . "/" . $mfn,                                          id => $input->{name} . "/" . $mfn,
455                                          ds => $ds,                                          ds => $ds,
456                                          type => $config->{$use_indexer}->{type},                                          type => $config->{$indexer_config}->{type},
457                                  ) if ($indexer && $ds);                                  ) if ($indexer && $ds);
458    
459                                  if ($marc) {                                  if ($marc) {
Legend:
Removed from v.672  
changed lines
  Added in v.674
  ViewVC Help
Powered by ViewVC 1.1.26