Changeset 29084
- Timestamp:
- 2014-05-29T11:37:53+12:00 (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
main/trunk/greenstone2/perllib/cgiactions/metadataaction.pm
r28252 r29084 2009 2009 my $doc_xml_filename = &util::filename_cat($archives_dir,$doc_xml_file); 2010 2010 2011 # If we're overriding everything, then $metamode=override combined with $metapos=undefined 2011 # If we're overriding everything, then $metamode=override combined with $metapos=undefined and $prevmetavalue=undefined 2012 2012 # in which case, we need to remove all metavalues for the metaname at the given (sub)section 2013 2013 # Thereafter, we will finally be setting the overriding metavalue for this metaname 2014 if (!defined $metapos && $metamode eq "override") {2015 $self->remove_from_doc_xml($gsdl_cgi, &util::filename_cat($archive_dir, $doc_xml_file), $metaname, $metapos, undef, $docid_secnum, $metamode);2016 } 2017 2014 if (!defined $prevmetavalue && !defined $metapos && $metamode eq "override") { 2015 # remove all values of $metaname metadata 2016 $self->remove_from_doc_xml($gsdl_cgi, &util::filename_cat($archive_dir, $doc_xml_file), $metaname, undef, undef, $docid_secnum, $metamode); 2017 } 2018 2018 # Edit the doc.xml file with the specified metadata name, value and position. 2019 2019 # TODO: there is a potential problem here as this edit_doc_xml function
Note:
See TracChangeset
for help on using the changeset viewer.