[open-ils-commits] r14294 - trunk/Open-ILS/src/perlmods/OpenILS/Application (dbs)
svn at svn.open-ils.org
svn at svn.open-ils.org
Wed Oct 7 15:31:04 EDT 2009
Author: dbs
Date: 2009-10-07 15:30:59 -0400 (Wed, 07 Oct 2009)
New Revision: 14294
Modified:
trunk/Open-ILS/src/perlmods/OpenILS/Application/Cat.pm
Log:
Generate a more correct record leader and 008 field for new MFHD records
Modified: trunk/Open-ILS/src/perlmods/OpenILS/Application/Cat.pm
===================================================================
--- trunk/Open-ILS/src/perlmods/OpenILS/Application/Cat.pm 2009-10-07 17:56:39 UTC (rev 14293)
+++ trunk/Open-ILS/src/perlmods/OpenILS/Application/Cat.pm 2009-10-07 19:30:59 UTC (rev 14294)
@@ -852,7 +852,7 @@
# The goal is to generate common patterns for the caller in the UI that
# then get passed in here.
if (!$xml) {
- $xml = "<record xsi:schemaLocation=\"http://www.loc.gov/MARC21/slim http://www.loc.gov/standards/marcxml/schema/MARC21slim.xsd\" xmlns:xsi=\"http://www.w3.org/2001/XMLSchema-instance\" xmlns=\"http://www.loc.gov/MARC21/slim\"> <leader>00307cy a22001094 4500</leader> <controlfield tag=\"001\">42153</controlfield> <controlfield tag=\"005\">20090601182414.0</controlfield> <controlfield tag=\"008\">051011 eng 090309</controlfield> <datafield tag=\"852\" ind1=\" \" ind2=\" \"> <subfield code=\"b\">" . $aou->name . "</subfield> </datafield></record>";
+ $xml = "<record xsi:schemaLocation=\"http://www.loc.gov/MARC21/slim http://www.loc.gov/standards/marcxml/schema/MARC21slim.xsd\" xmlns:xsi=\"http://www.w3.org/2001/XMLSchema-instance\" xmlns=\"http://www.loc.gov/MARC21/slim\"> <leader>00307ny a22001094 4500</leader> <controlfield tag=\"001\">42153</controlfield> <controlfield tag=\"005\">20090601182414.0</controlfield> <controlfield tag=\"008\"> 4u####8###l# 4 uueng1 </controlfield> <datafield tag=\"852\" ind1=\" \" ind2=\" \"> <subfield code=\"b\">" . $aou->name . "</subfield> </datafield></record>";
}
my $marcxml = XML::LibXML->new->parse_string($xml);
$marcxml->documentElement->setNamespace("http://www.loc.gov/MARC21/slim", "marc", 1 );
More information about the open-ils-commits
mailing list