Fix ModsParser.pm bug involving invalid ISBNs. See bug #697398.

git-svn-id: svn://svn.open-ils.org/ILS/branches/rel_1_6_2@19387 dcc99617-32d9-48b4-a31d-7c20da2025e4

diff --git a/Open-ILS/src/perlmods/OpenILS/Utils/ModsParser.pm b/Open-ILS/src/perlmods/OpenILS/Utils/ModsParser.pm
index d77d07d..287890c 100644 (file)
--- a/Open-ILS/src/perlmods/OpenILS/Utils/ModsParser.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Utils/ModsParser.pm
@@ -16,7 +16,7 @@ my $mods_sheet;
 
 # ----------------------------------------------------------------------------------------
 # XPATH for extracting info from a MODS doc
-my $isbn_xpath                 = "//mods:mods/mods:identifier[\@type='isbn']";
+my $isbn_xpath                 = "//mods:mods/mods:identifier[\@type='isbn' and not(\@invalid)]";
 my $resource_xpath     = "//mods:mods/mods:typeOfResource";
 my $pub_xpath                  = "//mods:mods/mods:originInfo//mods:dateIssued[\@encoding='marc']|" . 
                                                                "//mods:mods/mods:originInfo//mods:dateIssued[1]";