- Timestamp:
- 2022-08-16T19:38:05+12:00 (21 months ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
main/trunk/greenstone2/perllib/plugins/OAIMetadataXMLPlugin.pm
r24951 r36372 126 126 { 127 127 # Don't harvest file sets that don't have dc.Identifier set, "dc.Identifier" is usde as the key between Greenstone and OAI Server! 128 my $dc_identifier = &extrametautil::getmetadata_for_named_pos($extrametadata, $one_file, "dc.Identifier", 0); 128 #my $dc_identifier = &extrametautil::getmetadata_for_named_pos($extrametadata, $one_file, "dc.Identifier", 0); 129 my $dc_identifier = &extrametautil::getmetadatum_by_index($extrametadata, $one_file, "dc.Identifier", 0); 129 130 next if (!defined($dc_identifier) || $dc_identifier eq ""); 130 131 … … 199 200 } 200 201 201 &extrametautil::setmetadata_for_named_metaname($extrametadata, $one_file, $field_name, []) if (!defined (&extrametautil::getmetadata_for_named_metaname($extrametadata, $one_file, $field_name))); 202 &extrametautil::addmetadata_for_named_metaname($extrametadata, $one_file, $field_name, $value); 202 #&extrametautil::setmetadata_for_named_metaname($extrametadata, $one_file, $field_name, []) if (!defined (&extrametautil::getmetadata_for_named_metaname($extrametadata, $one_file, $field_name))); 203 #&extrametautil::addmetadata_for_named_metaname($extrametadata, $one_file, $field_name, $value); 204 &extrametautil::addmetadatum($extrametadata, $one_file, $field_name, $value); 203 205 } 204 206 #======================================================================#
Note:
See TracChangeset
for help on using the changeset viewer.