From a2ce009e5e00701dce188ad532ced1a8f7209aac Mon Sep 17 00:00:00 2001 From: dbs Date: Mon, 28 Sep 2009 18:42:10 +0000 Subject: [PATCH] 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. git-svn-id: svn://svn.open-ils.org/ILS/branches/rel_1_6_0@14180 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- Open-ILS/src/perlmods/OpenILS/WWW/SuperCat/Feed.pm | 66 +++++++++++----------- 1 file changed, 33 insertions(+), 33 deletions(-) diff --git a/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat/Feed.pm b/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat/Feed.pm index 5c1687243d..ac1ef54ab5 100644 --- a/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat/Feed.pm +++ b/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat/Feed.pm @@ -471,39 +471,6 @@ sub link { } } - -#---------------------------------------------------------- - -package OpenILS::WWW::SuperCat::Feed::mods32; -use base 'OpenILS::WWW::SuperCat::Feed::mods'; - -sub new { - my $class = shift; - my $self = $class->SUPER::build(''); - $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(''); - $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; @@ -557,6 +524,39 @@ sub link { #---------------------------------------------------------- +package OpenILS::WWW::SuperCat::Feed::mods32; +use base 'OpenILS::WWW::SuperCat::Feed::mods3'; + +sub new { + my $class = shift; + my $self = $class->SUPER::build(''); + $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(''); + $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'; -- 2.11.0