Changeset 215 for trunk/gsdl/bin/script

Timestamp:

1999-03-30T17:08:18+12:00 (25 years ago)

Author:

rjmcnab

Message:

Added code to build a new gdbm format.

File:

• trunk/gsdl/bin/script/buildcol.pl (modified) (3 diffs)

trunk/gsdl/bin/script/buildcol.pl

@@ -29 +29 @@
 {
     if (!parsargv::parse(\@ARGV, 
+             'newgdbm', \$newgdbm,
              'verbosity/\d+/2', \$verbosity,
              'archivedir/.*/', \$archivedir,
@@ -36 +37 @@
     die "\n";
     }
+
+    $newgdbm = 0 unless $newgdbm;
 
     # get and check the collection
@@ -109 +112 @@
 
     eval("\$builder = new $buildertype(\$collection, " .
-     "\$realarchivedir, \$realbuilddir, \$verbosity)");
+     "\$realarchivedir, \$realbuilddir, \$verbosity, \$newgdbm)");
     die "$@" if $@;