[open-ils-commits] r18706 - trunk/Open-ILS/src/perlmods/OpenILS/Application/Cat (dbs)

[svn at svn.open-ils.org]

Author: dbs
Date: 2010-11-11 11:50:10 -0500 (Thu, 11 Nov 2010)
New Revision: 18706

Modified:
   trunk/Open-ILS/src/perlmods/OpenILS/Application/Cat/Authority.pm
Log:
Do not supply a default value for 003 in new authority records

With cat.maintain_control_numbers enabled by default, we can trust
the database trigger to create the appropriate 003 for us - and by
not supplying a 003 in the new record, we won't create a spurious
035 for a brand new record.


Modified: trunk/Open-ILS/src/perlmods/OpenILS/Application/Cat/Authority.pm
===================================================================
--- trunk/Open-ILS/src/perlmods/OpenILS/Application/Cat/Authority.pm	2010-11-11 16:03:09 UTC (rev 18705)
+++ trunk/Open-ILS/src/perlmods/OpenILS/Application/Cat/Authority.pm	2010-11-11 16:50:10 UTC (rev 18706)
@@ -86,7 +86,7 @@
     my $arn = 'AUTOGEN-' . time();
 
     # Placeholder MARCXML; 
-    #   001/003 can be filled in via database triggers
+    #   001/003 can be be properly filled in via database triggers
     #   005 will be filled in automatically at creation time
     #   008 needs to be set by a cataloguer (could be some OU settings, I suppose)
     #   040 should come from OU settings / OU shortname
@@ -94,7 +94,6 @@
     my $marc_xml = <<MARCXML;
 <record xmlns:marc="http://www.loc.gov/MARC21/slim" xmlns="http://www.loc.gov/MARC21/slim"><leader>     nz  a22     o  4500</leader>
 <controlfield tag="001">$arn</controlfield>
-<controlfield tag="003">CONS</controlfield>
 <controlfield tag="008">      ||||||||||||||||||||||||||||||||||</controlfield>
 <datafield tag="040" ind1=" " ind2=" "><subfield code="a">CONS</subfield><subfield code="c">CONS</subfield></datafield>
 $control