From 000cc3cb450919e184b2fcce44cb6bc96d43ef4b Mon Sep 17 00:00:00 2001
From: tipaul <tipaul>
Date: Wed, 13 Sep 2006 14:16:37 +0000
Subject: [PATCH] synching opac search & librarian search.

---
 search.marc/search.pl | 39 +++++++++++++++++++++------------------
 1 file changed, 21 insertions(+), 18 deletions(-)

diff --git a/search.marc/search.pl b/search.marc/search.pl
index da9b21f089..8284bde36a 100755
--- a/search.marc/search.pl
+++ b/search.marc/search.pl
@@ -123,25 +123,28 @@ if ($op eq "do_search") {
 	# builds tag and subfield arrays
 	my @tags;
 
-	foreach my $marc (@marclist) {
-		if ($marc) {
-			my ($tag,$subfield) = MARCfind_marc_from_kohafield($dbh,$marc,'');
-			if ($tag) {
-				push @tags,$dbh->quote("$tag$subfield");
-			} else {
-				if ($marc =~ /^(\d){3}(. -)(.)*/)
-				{
-					# The user is using the search catalogue part, more fields
-					push @tags, $dbh->quote(substr($marc,0,4));
-				}
-				else
-				{
-					push @tags, $marc;
-				}
-			}
-		} else {
-			push @tags, "";
+	for (my $i=0;$i<=$#marclist;$i++) {
+		if ($marclist[$i] eq "biblioitems.isbn") {
+			$value[$i] =~ s/-//g;
 		}
+# 		if ($marc) {
+# 			my ($tag,$subfield) = MARCfind_marc_from_kohafield($dbh,$marc,'');
+# 			if ($tag) {
+# 				push @tags,$dbh->quote("$tag$subfield");
+# 			} else {
+# 				if ($marc =~ /^(\d){3}(. -)(.)*/)
+# 				{
+# 					# The user is using the search catalogue part, more fields
+# 					push @tags, $dbh->quote(substr($marc,0,4));
+# 				}
+# 				else
+# 				{
+# 					push @tags, $marc;
+# 				}
+# 			}
+# 		} else {
+# 			push @tags, "";
+# 		}
 	}
 	findseealso($dbh,\@tags);
 	my ($results,$total) = catalogsearch($dbh, \@tags,\@and_or,
-- 
2.39.5