/[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 762 by dpavlin, Wed Oct 25 18:54:45 2006 UTC revision 765 by dpavlin, Wed Oct 25 21:01:51 2006 UTC
# Line 396  while (my ($database, $db_config) = each Line 396  while (my ($database, $db_config) = each
396                  my $lookup_data = WebPAC::Normalize::_get_lookup();                  my $lookup_data = WebPAC::Normalize::_get_lookup();
397    
398                  if (defined( $lookup_data->{$database}->{$input_name} )) {                  if (defined( $lookup_data->{$database}->{$input_name} )) {
399                          $log->debug("created following lookups: ", dump( $lookup_data ));                          $log->debug("created following lookups: ", sub { dump( $lookup_data ) } );
400    
401                          foreach my $key (keys %{ $lookup_data->{$database}->{$input_name} }) {                          foreach my $key (keys %{ $lookup_data->{$database}->{$input_name} }) {
402                                  $store->save_lookup(                                  $store->save_lookup(
# Line 500  while (my ($database, $db_config) = each Line 500  while (my ($database, $db_config) = each
500                                  },                                  },
501                          );                          );
502    
503                          $log->debug("ds = ",dump($ds)) if ($ds);                          $log->debug("ds = ", sub { dump($ds) }) if ($ds);
504    
505                          $store->save_ds(                          $store->save_ds(
506                                  database => $database,                                  database => $database,
Legend:
Removed from v.762  
changed lines
  Added in v.765
  ViewVC Help
Powered by ViewVC 1.1.26