Changeset 14374


Ignore:
Timestamp:
2007-08-15T13:02:53+12:00 (15 years ago)
Author:
mdewsnip
Message:

Fix to problem where the "indexmap" line would be lost from the build.cfg file when running buildcol.pl with "-mode infodb".

Location:
gsdl/trunk/perllib
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • gsdl/trunk/perllib/basebuilder.pm

    r14245 r14374  
    440440    }
    441441    }
    442     $build_cfg->{'indexmap'} = \@indexmap;
     442    $build_cfg->{'indexmap'} = \@indexmap if scalar (@indexmap);
    443443
    444444    my @subcollectionmap = ();
  • gsdl/trunk/perllib/mgppbuilder.pm

    r13813 r14374  
    789789    my @indexfieldmap = ();
    790790    my @indexfields = ();
    791    
     791    my @indexmap = ();
     792
    792793    if (scalar(keys %{$self->{'buildproc'}->{'indexfieldmap'}}) == 0) {
    793794    # set the default mapping
     
    822823    }       
    823824
     825    if (defined $buildcfg->{'indexmap'}) {
     826    foreach $field (@{$buildcfg->{'indexmap'}}) {
     827        push (@indexmap, "$field");
     828    }
     829    }       
     830
    824831    $self->{'build_cfg'}->{'indexfieldmap'} = \@indexfieldmap;
    825832    $self->{'build_cfg'}->{'indexfields'} = \@indexfields;
     833    $self->{'build_cfg'}->{'indexmap'} = \@indexmap;
    826834}
    827835
Note: See TracChangeset for help on using the changeset viewer.