Changeset 21568 for main/trunk/greenstone2/perllib/arcinfo.pm
- Timestamp:
- 2010-01-21T16:31:01+13:00 (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
main/trunk/greenstone2/perllib/arcinfo.pm
r21564 r21568 221 221 foreach my $oid ( keys %$infodb_map ) { 222 222 # consider making the following a method in dbutil 223 # e.g. write_infodb_rawentry _gdbm($infodb_handle,$oid,$vals);223 # e.g. write_infodb_rawentry($infodb_handle,$oid,$vals); 224 224 225 225 # no need to escape, as $infodb_map->{$oid} hasn't been unescaped
Note:
See TracChangeset
for help on using the changeset viewer.