Changeset 18660 for gsdl/trunk/bin/script/export.pl

Timestamp:

2009-03-11T13:19:22+13:00 (15 years ago)

Author:

kjdon

Message:

we now use gdb instead of ldb/bdb for collection and archives-inf databases. We have a rename step to rename any legacy databases

File:

• gsdl/trunk/bin/script/export.pl (modified) (1 diff)

gsdl/trunk/bin/script/export.pl

@@ -501 +501 @@
     } elsif ($saveas =~ m/^.*METS$/ || $saveas eq "MARC" ) {
 ##  $expinfo_doc_filename = &util::filename_cat ($exportdir, "export.inf");
-    my $db_ext = &util::is_little_endian() ? ".ldb" : ".bdb";
-    my $doc_db = "archiveinf-doc$db_ext";
+    my $doc_db = "archiveinf-doc";
     $expinfo_doc_filename = &util::filename_cat ($exportdir, $doc_db);
+    &util::rename_gdbm_file($expinfo_doc_filename); # ensures gdb in case we have an existing legacy ldb one - can this happen?
+    $expinfo_doc_filename .= ".gdb";
+
     }