replace / with " " for indexing

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

diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Ingest.pm b/Open-ILS/src/perlmods/OpenILS/Application/Ingest.pm
index 0a3cbd4..f9ee0ac 100644 (file)
--- a/Open-ILS/src/perlmods/OpenILS/Application/Ingest.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Ingest.pm
@@ -703,6 +703,7 @@ sub xpath_to_string {
                }
        }
 
+    $string =~ s/(\w+)\/(\w+)/$1 $2/sgo;
     $string =~ s/(\d{4})-(\d{4})/$1 $2/sgo;
 
        return NFD($string);
@@ -910,6 +911,7 @@ sub _marcxml_to_full_rows {
                        $val =~ s/\pM+//sgo;
                        $val =~ s/\pC+//sgo;
                        $val =~ s/\W+$//sgo;
+            $val =~ s/(\w+)\/(\w+)/$1 $2/sgo;
             $val =~ s/(\d{4})-(\d{4})/$1 $2/sgo;
                        $ns->value( lc($val) );