[open-ils-commits] r14179 - branches/rel_1_6/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat (dbs)

svn at svn.open-ils.org svn at svn.open-ils.org
Mon Sep 28 14:41:19 EDT 2009


Author: dbs
Date: 2009-09-28 14:41:15 -0400 (Mon, 28 Sep 2009)
New Revision: 14179

Modified:
   branches/rel_1_6/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat/Feed.pm
Log:
Make MODS v3 variants inherit from mods3 rather than mods (version 2).

Results in the correct namespace being applied to MODS v3[123] and makes Zotero happy.


Modified: branches/rel_1_6/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat/Feed.pm
===================================================================
--- branches/rel_1_6/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat/Feed.pm	2009-09-28 18:37:33 UTC (rev 14178)
+++ branches/rel_1_6/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat/Feed.pm	2009-09-28 18:41:15 UTC (rev 14179)
@@ -471,41 +471,8 @@
 	}
 }
 
-
 #----------------------------------------------------------
 
-package OpenILS::WWW::SuperCat::Feed::mods32;
-use base 'OpenILS::WWW::SuperCat::Feed::mods';
-
-sub new {
-	my $class = shift;
-	my $self = $class->SUPER::build('<mods:modsCollection version="3.2" xmlns:mods="http://www.loc.gov/mods/v3"/>');
-	$self->{type} = 'application/xml';
-	$self->{item_xpath} = '/mods:modsCollection';
-	return $self;
-}
-
-package OpenILS::WWW::SuperCat::Feed::mods32::item;
-use base 'OpenILS::WWW::SuperCat::Feed::mods::item';
-
-#----------------------------------------------------------
-
-package OpenILS::WWW::SuperCat::Feed::mods33;
-use base 'OpenILS::WWW::SuperCat::Feed::mods';
-
-sub new {
-	my $class = shift;
-	my $self = $class->SUPER::build('<mods:modsCollection version="3.3" xmlns:mods="http://www.loc.gov/mods/v3"/>');
-	$self->{type} = 'application/xml';
-	$self->{item_xpath} = '/mods:modsCollection';
-	return $self;
-}
-
-package OpenILS::WWW::SuperCat::Feed::mods33::item;
-use base 'OpenILS::WWW::SuperCat::Feed::mods::item';
-
-#----------------------------------------------------------
-
 package OpenILS::WWW::SuperCat::Feed::mods3;
 use base 'OpenILS::WWW::SuperCat::Feed::mods';
 
@@ -557,6 +524,39 @@
 
 #----------------------------------------------------------
 
+package OpenILS::WWW::SuperCat::Feed::mods32;
+use base 'OpenILS::WWW::SuperCat::Feed::mods3';
+
+sub new {
+	my $class = shift;
+	my $self = $class->SUPER::build('<mods:modsCollection version="3.2" xmlns:mods="http://www.loc.gov/mods/v3"/>');
+	$self->{type} = 'application/xml';
+	$self->{item_xpath} = '/mods:modsCollection';
+	return $self;
+}
+
+package OpenILS::WWW::SuperCat::Feed::mods32::item;
+use base 'OpenILS::WWW::SuperCat::Feed::mods3::item';
+
+#----------------------------------------------------------
+
+package OpenILS::WWW::SuperCat::Feed::mods33;
+use base 'OpenILS::WWW::SuperCat::Feed::mods3';
+
+sub new {
+	my $class = shift;
+	my $self = $class->SUPER::build('<mods:modsCollection version="3.3" xmlns:mods="http://www.loc.gov/mods/v3"/>');
+	$self->{type} = 'application/xml';
+	$self->{item_xpath} = '/mods:modsCollection';
+	return $self;
+}
+
+package OpenILS::WWW::SuperCat::Feed::mods33::item;
+use base 'OpenILS::WWW::SuperCat::Feed::mods3::item';
+
+
+#----------------------------------------------------------
+
 package OpenILS::WWW::SuperCat::Feed::marcxml;
 use base 'OpenILS::WWW::SuperCat::Feed';
 



More information about the open-ils-commits mailing list