Changeset 17063
- Timestamp:
- 2008-08-28T14:08:46+12:00 (16 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
gsdl/trunk/perllib/plugouts/FedoraMETSPlugout.pm
r17015 r17063 250 250 my $top_section = $doc_obj->get_top_section(); 251 251 my $plugin_type = $doc_obj->get_metadata_element($top_section,"Plugin"); 252 253 if ((defined $plugin_type) && ($plugin_type eq "ImagePlugin")) 254 { 255 256 $all_text .= "<mets:amdSec ID=\"RELS-EXT\">\n"; 257 $all_text .= " <mets:techMD ID=\"RELS-EXT1.0\" STATUS=\"A\">\n"; 258 $all_text .= " <mets:mdWrap LABEL=\"RELS-EXT - RDF formatted relationship metadata\" MDTYPE=\"OTHER\" MIMETYPE=\"text/xml\">\n"; 259 $all_text .= " <mets:xmlData>\n"; 260 $all_text .= " <rdf:RDF xmlns:rdf=\"http://www.w3.org/1999/02/22-rdf-syntax-ns#\" xmlns:fedora-model=\"info:fedora/fedora-system:def/model#\">\n"; 261 $all_text .= " <rdf:Description rdf:about=\"info:fedora/$fed_id\">\n"; 262 $all_text .= " <fedora-model:hasContentModel rdf:resource=\"info:fedora/demo:UVA_STD_IMAGE\"/>\n"; 263 $all_text .= " </rdf:Description>\n"; 264 $all_text .= " </rdf:RDF>\n"; 265 $all_text .= " </mets:xmlData>\n"; 266 $all_text .= " </mets:mdWrap>\n"; 267 $all_text .= " </mets:techMD>\n"; 268 $all_text .= "</mets:amdSec>\n"; 269 } 252 253 # Images do not get ingested into Fedora when on Linux if the following is included 254 # Needs more investigation, since we'd like a working version of the following 255 # in order to get thumbnails working and other stuff. 256 # if ((defined $plugin_type) && ($plugin_type eq "ImagePlugin")) 257 # { 258 # 259 # $all_text .= "<mets:amdSec ID=\"RELS-EXT\">\n"; 260 # $all_text .= " <mets:techMD ID=\"RELS-EXT1.0\" STATUS=\"A\">\n"; 261 # $all_text .= " <mets:mdWrap LABEL=\"RELS-EXT - RDF formatted relationship metadata\" MDTYPE=\"OTHER\" MIMETYPE=\"text/xml\">\n"; 262 # $all_text .= " <mets:xmlData>\n"; 263 # $all_text .= " <rdf:RDF xmlns:rdf=\"http://www.w3.org/1999/02/22-rdf-syntax-ns#\" xmlns:fedora-model=\"info:fedora/fedora-system:def/model#\">\n"; 264 # $all_text .= " <rdf:Description rdf:about=\"info:fedora/$fed_id\">\n"; 265 # $all_text .= " <fedora-model:hasContentModel rdf:resource=\"info:fedora/demo:UVA_STD_IMAGE\"/>\n"; 266 # $all_text .= " </rdf:Description>\n"; 267 # $all_text .= " </rdf:RDF>\n"; 268 # $all_text .= " </mets:xmlData>\n"; 269 # $all_text .= " </mets:mdWrap>\n"; 270 # $all_text .= " </mets:techMD>\n"; 271 # $all_text .= "</mets:amdSec>\n"; 272 # } 270 273 271 274 return $all_text; … … 684 687 my $id = $doc_obj->get_metadata_element($top_section,"Identifier"); 685 688 689 print STDERR "**** mime-type: $mime_attr\n"; 690 686 691 $all_text .= " <mets:file $mime_attr $id_attr $opt_owner_id >\n"; 687 692 $all_text .= " <mets:FLocat LOCTYPE=\"URL\" $xlink_href $xlink_title />\n";
Note:
See TracChangeset
for help on using the changeset viewer.