Changeset 30489 for main/trunk/greenstone2/perllib/inexport.pm

Timestamp:

2016-05-04T12:08:22+12:00 (8 years ago)

Author:

davidb

Message:

Added in missing function, after DBUtil rewrite

File:

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

main/trunk/greenstone2/perllib/inexport.pm

@@ -1421 +1421 @@
         $val =~ s/^<index-status>(.*)$/<index-status>D/m;
 
-        my $val_rec = &dbutil::convert_infodb_string_to_hash($val);
+        my $val_rec = &dbutil::convert_infodb_string_to_hash($infodbtype,$val);
         my $doc_infodb_file_handle = &dbutil::open_infodb_write_handle($infodbtype, $arcinfo_doc_filename, "append");