Changeset 23171

Show
Ignore:
Timestamp:
19.10.2010 14:54:50 (9 years ago)
Author:
kjdon
Message:

if infodbtype is gdbm-txtgz, we need to use gdbm for all archives dbs

Location:
main/trunk/greenstone2/perllib/plugins
Files:
2 modified

Legend:

Unmodified
Added
Removed
  • main/trunk/greenstone2/perllib/plugins/ArchivesInfPlugin.pm

    r21614 r23171  
    227227    # Get the infodbtype value for this collection from the buildproc object 
    228228    my $infodbtype = $processor->{'infodbtype'}; 
    229  
     229    $infodbtype = "gdbm" if $infodbtype eq "gdbm-txtgz"; 
     230     
    230231    # see if this has a archives information file within it 
    231232##    my $archive_info_filename = &util::filename_cat($base_dir,$file,"archives.inf"); 
  • main/trunk/greenstone2/perllib/plugins/DirectoryPlugin.pm

    r22896 r23171  
    129129        # Get the infodbtype value for this collection from the arcinfo object 
    130130        my $infodbtype = $processor->getoutputinfo()->{'infodbtype'}; 
     131    $infodbtype = "gdbm" if $infodbtype eq "gdbm-txtgz"; # in archives, cannot use txtgz version 
    131132    my $output_dir = $processor->getoutputdir(); 
    132133##  my $archives_inf = &util::filename_cat($output_dir,"archives.inf");