Changeset 21585

Timestamp:

2010-01-22T16:45:13+13:00 (14 years ago)

Author:

mdewsnip

Message:

Changed one occurrence of dbutil::read_infodb_keys() to dbutil::read_infodb_file() -- slower, but more general. Part of making the code less GDBM-specific.

File:

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

main/trunk/greenstone2/perllib/arcinfo.pm

@@ -139 +139 @@
     my $infodb_map = {};
 
-    &dbutil::read_infodb_keys($self->{'infodbtype'}, $filename, $infodb_map);
+    &dbutil::read_infodb_file($self->{'infodbtype'}, $filename, $infodb_map);
 
     foreach my $file ( keys %$infodb_map ) {