- Timestamp:
- 2010-01-26T17:23:28+13:00 (14 years ago)
- Location:
- main/trunk/greenstone2
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
main/trunk/greenstone2/bin/script/set_metadata.pl
r12844 r21644 38 38 if ($action eq "ADD") 39 39 { 40 &IncrementalBuildUtils::setDocumentMetadata($collection, $oid, $field, "", $a_value, 1);40 &IncrementalBuildUtils::setDocumentMetadata($collection, "gdbm", $oid, $field, "", $a_value, 1); 41 41 } 42 42 elsif ($action eq "REMOVE") 43 43 { 44 &IncrementalBuildUtils::setDocumentMetadata($collection, $oid, $field, $a_value, "", 1);44 &IncrementalBuildUtils::setDocumentMetadata($collection, "gdbm", $oid, $field, $a_value, "", 1); 45 45 } 46 46 elsif ($action eq "REPLACE") 47 47 { 48 &IncrementalBuildUtils::setDocumentMetadata($collection, $oid, $field, $a_value, $b_value, 1);48 &IncrementalBuildUtils::setDocumentMetadata($collection, "gdbm", $oid, $field, $a_value, $b_value, 1); 49 49 } 50 50 -
main/trunk/greenstone2/perllib/IncrementalBuildUtils.pm
r21643 r21644 90 90 if ($key eq "docnum") 91 91 { 92 &setDocumentMetadata($collection, $ doc_obj->get_OID() . "$section", $key, "", $value, $updateindex);92 &setDocumentMetadata($collection, $infodbtype, $doc_obj->get_OID() . "$section", $key, "", $value, $updateindex); 93 93 $found_docnum = 1; 94 94 } … … 119 119 } 120 120 # Go ahead and set the metadata 121 &setDocumentMetadata($collection, $ doc_obj->get_OID() . "$section", $key, "", $value, $updateindex);121 &setDocumentMetadata($collection, $infodbtype, $doc_obj->get_OID() . "$section", $key, "", $value, $updateindex); 122 122 } 123 123 } … … 195 195 sub setDocumentMetadata() 196 196 { 197 my ($collection, $ oid, $key, $old_value, $new_value, $updateindex) = @_;198 print STDERR "IncrementalBuildUtils::setDocumentMetadata('$collection', '$oid','$key','$old_value','$new_value',$updateindex)\n" unless !$debug;197 my ($collection, $infodbtype, $oid, $key, $old_value, $new_value, $updateindex) = @_; 198 print STDERR "IncrementalBuildUtils::setDocumentMetadata('$collection',$infodbtype,'$oid','$key','$old_value','$new_value',$updateindex)\n" unless !$debug; 199 199 # A. Establish connection to Lucene 200 200 # This isn't required at the moment, but might be later if we implement
Note:
See TracChangeset
for help on using the changeset viewer.