[Koha-cvs] koha/C4 SearchMarc.pm

[Chris Cormack]

CVSROOT:        /sources/koha
Module name:    koha
Branch:         
Changes by:     Chris Cormack <address@hidden>  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 \""address@hidden"\"";
+                               $query .= "Author all /relevant 
\""address@hidden"\"";
                        } elsif ($field eq 'biblio.title') {
-                           $query .= "Title all \""address@hidden"\"";
+                           $query .= "dc.title all /relevant 
\""address@hidden"\"";
                        } elsif ($field eq 'biblioitems.isbn') {
                                $query .= "Isbn= "address@hidden;
                        } elsif ($field eq 'bibliosubject.subject'){
-                           $query.="Subject all \"@$value[$i]\"";
+                           $query.="Subject all /relevant \"@$value[$i]\"";
                        } elsif ($field eq 'biblioitems.itemtype'){
                            $query="address@hidden";
                        } elsif ($field eq 'items.homebranch'){
@@ -238,9 +238,10 @@
                            $query="address@hidden";
                        } else {
                                warn $field;
-                               my @spacedout=split(/ /,@$value[$i]);
-                               my $text = join(" and ",@spacedout);
-                               $query .= "$text";
+#                              my @spacedout=split(/ /,@$value[$i]);
+#                              my $text = join(" and ",@spacedout);
+                               
+                               $query .= "dc.any all /relevant 
\"@$value[$i]\"";
                        }
                }
 #              warn "$i : "address@hidden "=> $tag / $subfield = 
".$tagslib->{$tag}->{$subfield}->{kohafield};