Changeset 21551

Timestamp:

2010-01-21T14:08:10+13:00 (14 years ago)

Author:

mdewsnip

Message:

Changed calls to GDBMUtils::serializeHash() to dbutil::convert_infodb_hash_to_string(). Part of removing GDBMUtils.pm and making the code less GDBM-specific.

File:

• main/trunk/greenstone2/perllib/cgiactions/metadataaction.pm (modified) (3 diffs)

main/trunk/greenstone2/perllib/cgiactions/metadataaction.pm

@@ -30 +30 @@
 use cgiactions::baseaction;
 
+use dbutil;
 use GDBMUtils;
 use ghtml;
@@ -329 +330 @@
     ## print STDERR "**** metavalue = $metavalue\n";
 
-    my $serialized_doc_rec = GDBMUtils::serializeHash($doc_rec);
+    my $serialized_doc_rec = &dbutil::convert_infodb_hash_to_string($doc_rec);
 
     ## print STDERR "**** ser dr\n$serialized_doc_rec\n\n\n";
@@ -845 +846 @@
     $doc_rec->{$metaname} = $filtered_metadata;
 
-    my $serialized_doc_rec = GDBMUtils::serializeHash($doc_rec);
+    my $serialized_doc_rec = &dbutil::convert_infodb_hash_to_string($doc_rec);
 
     my $cmd = "gdbmset \"$gdbm_db\" \"$docid\" \"$serialized_doc_rec\"";