[open-ils-commits] r9764 -
branches/rel_1_2_2/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat
svn at svn.open-ils.org
svn at svn.open-ils.org
Wed Jun 4 00:00:51 EDT 2008
Author: miker
Date: 2008-06-04 00:00:48 -0400 (Wed, 04 Jun 2008)
New Revision: 9764
Modified:
branches/rel_1_2_2/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat/Feed.pm
Log:
fix the marcxml feed to use default namespace on the record element
Modified: branches/rel_1_2_2/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat/Feed.pm
===================================================================
--- branches/rel_1_2_2/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat/Feed.pm 2008-06-04 00:59:02 UTC (rev 9763)
+++ branches/rel_1_2_2/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat/Feed.pm 2008-06-04 04:00:48 UTC (rev 9764)
@@ -514,9 +514,8 @@
my $self = $class->SUPER::build($xml);
return undef unless $self;
$self->{doc}->documentElement->setNamespace('http://www.loc.gov/MARC21/slim', undef);
- $self->{doc}->documentElement->setNamespace('http://www.loc.gov/MARC21/slim', 'marc');
$self->{type} = 'application/xml';
- $self->{holdings_xpath} = '/marc:record';
+ $self->{holdings_xpath} = '/*[local-name()="record"]';
return $self;
}
@@ -527,7 +526,7 @@
if ($type eq 'opac') {
$self->_create_node(
- 'marc:record',
+ '*[local-name()="record"]',
'http://www.w3.org/1999/xhtml',
'xhtml:link',
undef,
@@ -536,7 +535,7 @@
$linkid++;
} elsif ($type eq 'unapi-id') {
$self->_create_node(
- 'marc:record',
+ '*[local-name()="record"]',
'http://www.w3.org/1999/xhtml',
'xhtml:abbr',
undef,
More information about the open-ils-commits
mailing list