Show
Ignore:
Timestamp:
06.07.2010 13:00:40 (10 years ago)
Author:
kjdon
Message:

remove ex. when generating index lists. Don't want any ex. in build.cfg. This fixes the problem where index list had eg ex.Photographer and collectionmeta in config file had .Photographer and then they didn't match up.

Files:
1 modified

Legend:

Unmodified
Added
Removed
  • main/trunk/greenstone2/perllib/mgppbuilder.pm

    r20418 r22352  
    101101    if (defined $indexes) { 
    102102    $self->{'collect_cfg'}->{'indexes'} = []; 
    103     push (@{$self->{'collect_cfg'}->{'indexes'}}, join(';', @$indexes).";"); 
     103    my $single_index = join(';', @$indexes).";"; 
     104    # remove any ex. from index spec 
     105    $single_index =~ s/^ex\.//; 
     106    $single_index =~ s/([,;])ex\./$1/g; 
     107    push (@{$self->{'collect_cfg'}->{'indexes'}}, $single_index); 
    104108    } 
    105109}