Changeset 15013 for gsdl/trunk/perllib/plugouts/METSPlugout.pm
- Timestamp:
- 2008-02-27T16:36:05+13:00 (16 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
gsdl/trunk/perllib/plugouts/METSPlugout.pm
r14970 r15013 192 192 { 193 193 my $self = shift(@_); 194 my ($handle, $extra_attr ) = @_;194 my ($handle, $extra_attr, $extra_schema) = @_; 195 195 196 196 print $handle '<?xml version="1.0" encoding="UTF-8" standalone="no"?>' . "\n"; … … 198 198 print $handle ' xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"' . "\n"; 199 199 print $handle ' xmlns:gsdl3="http://www.greenstone.org/namespace/gsdlmetadata/1.0/"' . "\n"; 200 ## print $handle ' xmlns:xlink="http://www.w3.org/TR/xlink"' ."\n"; 201 print $handle ' xmlns:xlink="http://www.w3.org/1999/xlink"' ."\n"; 200 if ($ENV{'FEDORA2_HOME'}) { 201 print $handle ' xmlns:xlink="http://www.w3.org/TR/xlink"' ."\n"; 202 } 203 else { 204 print $handle ' xmlns:xlink="http://www.w3.org/1999/xlink"' ."\n"; 205 } 202 206 print $handle ' xsi:schemaLocation="http://www.loc.gov/METS/' . "\n"; 203 207 print $handle ' http://www.loc.gov/standards/mets/mets.xsd' . "\n"; 208 print $handle " $extra_schema\n" if (defined $extra_schema); 204 209 print $handle ' http://www.greenstone.org/namespace/gsdlmetadata/1.0/' . "\n"; 205 210 print $handle ' http://www.greenstone.org/namespace/gsdlmetadata/1.0/gsdl_metadata.xsd"' . "\n";
Note:
See TracChangeset
for help on using the changeset viewer.