[open-ils-commits] r15423 - trunk/Open-ILS/src/perlmods/OpenILS/Utils/MFHD/test (djfiander)

[svn at svn.open-ils.org]

Author: djfiander
Date: 2010-02-01 19:35:05 -0500 (Mon, 01 Feb 2010)
New Revision: 15423

Modified:
   trunk/Open-ILS/src/perlmods/OpenILS/Utils/MFHD/test/testlib.pm
Log:
Fix the leader to ensure that holdings can be compressed.


Modified: trunk/Open-ILS/src/perlmods/OpenILS/Utils/MFHD/test/testlib.pm
===================================================================
--- trunk/Open-ILS/src/perlmods/OpenILS/Utils/MFHD/test/testlib.pm	2010-02-01 21:25:33 UTC (rev 15422)
+++ trunk/Open-ILS/src/perlmods/OpenILS/Utils/MFHD/test/testlib.pm	2010-02-02 00:35:05 UTC (rev 15423)
@@ -29,7 +29,7 @@
     $marc = MARC::Record->new();
     carp('No record created!') unless $marc;
 
-    $marc->leader('01119nas  2200313 a 4500');
+    $marc->leader('01119nas  22003134a 4500');
     $marc->append_fields(
         MARC::Field->new('008', '970701c18439999enkwr p       0   a0eng  '));
     $marc->append_fields(