Changeset 15013 for gsdl/trunk/perllib/plugouts/FedoraMETSPlugout.pm

Timestamp:

2008-02-27T16:36:05+13:00 (15 years ago)

Author:

davidb

Message:

Adjustment to Fedora and METS plugouts so they can handle Fedora v2.x or Fedora v3.x

File:

• gsdl/trunk/perllib/plugouts/FedoraMETSPlugout.pm (modified) (1 diff)

gsdl/trunk/perllib/plugouts/FedoraMETSPlugout.pm

@@ -84 +84 @@
     my $collection = $ENV{'GSDLCOLLECTION'};
 
-  # Might need the following in the schemeLocation attribute for Fedora3
-  #   http://www.fedora.info/definitions/1/0/mets-fedora-ext1-1.xsd
-
-    my $extra_attr = "OBJID=\"$oid_namespace:$collection-$OID\" TYPE=\"FedoraObject\" LABEL=\"$doc_title\" EXT_VERSION=\"1.1\"";
-
-    $self->output_mets_xml_header_extra_attribute($handle,$extra_attr);
+    # Might need the following in the schemeLocation attribute for Fedora3
+    #   http://www.fedora.info/definitions/1/0/mets-fedora-ext1-1.xsd
+
+    my $extra_attr = "OBJID=\"$oid_namespace:$collection-$OID\" TYPE=\"FedoraObject\" LABEL=\"$doc_title\"";
+
+    my $extra_schema = undef;
+
+    if ($ENV{'FEDORA2_HOME'}) {
+    $extra_schema = "http://www.fedora.info/definitions/1/0/mets-fedora-ext.xsd";
+    }
+    else {
+    $extra_attr .= " EXT_VERSION=\"1.1\"";
+    }
+    
+    $self->output_mets_xml_header_extra_attribute($handle,$extra_attr,$extra_schema);
 
     print $handle '<mets:metsHdr RECORDSTATUS="A"/>'. "\n"; # A = active