[open-ils-commits] r373 - conifer/trunk/tools/migration-scripts (dbs)

[svn at svn.open-ils.org]

Author: dbs
Date: 2009-04-21 00:24:21 -0400 (Tue, 21 Apr 2009)
New Revision: 373

Modified:
   conifer/trunk/tools/migration-scripts/fix_bad_marcxml.pl
Log:
Don't forget ind2, which is usually in good shape


Modified: conifer/trunk/tools/migration-scripts/fix_bad_marcxml.pl
===================================================================
--- conifer/trunk/tools/migration-scripts/fix_bad_marcxml.pl	2009-04-21 04:22:03 UTC (rev 372)
+++ conifer/trunk/tools/migration-scripts/fix_bad_marcxml.pl	2009-04-21 04:24:21 UTC (rev 373)
@@ -42,9 +42,9 @@
 		} elsif ($_ =~ m#<subfield code="&">#o) {
 			print STDERR "Bad subfield code & at line $lineno of file $file\n";
 			$_ =~ s{<subfield code="&">}{<subfield code="Z">}o;
-		} elsif ($_ =~ m#<datafield tag="6" ind1=".">#o) {
+		} elsif ($_ =~ m#<datafield tag="6" ind1="."#o) {
 			print STDERR "Bad datafield tag 6 at line $lineno of file $file\n";
-			$_ =~ s{<datafield tag="6" ind1=".">}{<datafield tag="600" ind1=" ">}o;
+			$_ =~ s{<datafield tag="6" ind1="."}{<datafield tag="600" ind1=" "}o;
 		}
 		
 		$lastline = $_;