Changeset 23171 for main/trunk/greenstone2/perllib/plugins/ArchivesInfPlugin.pm

Timestamp:

2010-10-19T14:54:50+13:00 (14 years ago)

Author:

kjdon

Message:

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

File:

• main/trunk/greenstone2/perllib/plugins/ArchivesInfPlugin.pm (modified) (1 diff)

main/trunk/greenstone2/perllib/plugins/ArchivesInfPlugin.pm

@@ -227 +227 @@
     # Get the infodbtype value for this collection from the buildproc object
     my $infodbtype = $processor->{'infodbtype'};
-
+    $infodbtype = "gdbm" if $infodbtype eq "gdbm-txtgz";
+    
     # see if this has a archives information file within it
 ##    my $archive_info_filename = &util::filename_cat($base_dir,$file,"archives.inf");