From dfee747b4eab7a5a0c3425ee83f9b5a72b14c1b7 Mon Sep 17 00:00:00 2001
From: tipaul <tipaul>
Date: Thu, 7 Apr 2005 10:05:25 +0000
Subject: [PATCH] adding / to the list of symbols that are replace by spaces
 for searches

---
 C4/Biblio.pm | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/C4/Biblio.pm b/C4/Biblio.pm
index ec0e560536..1c1e940699 100644
--- a/C4/Biblio.pm
+++ b/C4/Biblio.pm
@@ -1146,7 +1146,7 @@ sub MARCaddword {
         $subfieldid, $subfieldorder, $sentence
       )
       = @_;
-    $sentence =~ s/(\.|\?|\:|\!|\'|,|\-|\"|\(|\)|\[|\]|\{|\})/ /g;
+    $sentence =~ s/(\.|\?|\:|\!|\'|,|\-|\"|\(|\)|\[|\]|\{|\}|\/)/ /g;
     my @words = split / /, $sentence;
     my $stopwords = C4::Context->stopwords;
     my $sth       =
@@ -2623,6 +2623,9 @@ Paul POULAIN paul.poulain@free.fr
 
 # $Id$
 # $Log$
+# Revision 1.115.2.9  2005/04/07 10:05:25  tipaul
+# adding / to the list of symbols that are replace by spaces for searches
+#
 # Revision 1.115.2.8  2005/03/25 16:23:49  tipaul
 # some improvements :
 # * return immediatly when a subfield is empty
-- 
2.39.5