[Koha-cvs] koha/C4 SearchMarc.pm

[Chris Cormack]

CVSROOT:	/sources/koha
Module name:	koha
Branch: 	
Changes by:	Chris Cormack <rangi at savannah.gnu.org>	06/03/28 21:29:56

Modified files:
	C4             : SearchMarc.pm 

Log message:
	All searches being ranked by relevance by default

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/koha/C4/SearchMarc.pm.diff?tr1=1.65&tr2=1.66&r1=text&r2=text

Patches:
Index: koha/C4/SearchMarc.pm
diff -u koha/C4/SearchMarc.pm:1.65 koha/C4/SearchMarc.pm:1.66
--- koha/C4/SearchMarc.pm:1.65	Wed Mar 22 03:55:10 2006
+++ koha/C4/SearchMarc.pm	Tue Mar 28 21:29:56 2006
@@ -223,13 +223,13 @@
 			$query .= " and " if ($query);
 			my $field = $tagslib->{$tag}->{$subfield}->{kohafield};
 			if ($field eq 'biblio.author') {
-				$query .= "Author all \"".@$value[$i]."\"";
+				$query .= "Author all /relevant \"".@$value[$i]."\"";
 			} elsif ($field eq 'biblio.title') {
-			    $query .= "Title all \"".@$value[$i]."\"";
+			    $query .= "dc.title all /relevant \"".@$value[$i]."\"";
 			} elsif ($field eq 'biblioitems.isbn') {
 				$query .= "Isbn= ".@$value[$i];
 			} elsif ($field eq 'bibliosubject.subject'){
-			    $query.="Subject all \"@$value[$i]\"";
+			    $query.="Subject all /relevant \"@$value[$i]\"";
 			} elsif ($field eq 'biblioitems.itemtype'){
 			    $query="Itemtype=@$value[$i]";
 			} elsif ($field eq 'items.homebranch'){
@@ -238,9 +238,10 @@
 			    $query="Barcode=@$value[$i]";
 			} else {
 			        warn $field;
-			        my @spacedout=split(/ /,@$value[$i]);
-			        my $text = join(" and ", at spacedout);
-				$query .= "$text";
+#			        my @spacedout=split(/ /,@$value[$i]);
+#			        my $text = join(" and ", at spacedout);
+			        
+				$query .= "dc.any all /relevant \"@$value[$i]\"";
 			}
 		}
 # 		warn "$i : ".@$tags[$i]. "=> $tag / $subfield = ".$tagslib->{$tag}->{$subfield}->{kohafield};