koha-cvs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Koha-cvs] CVS: koha/C4 Biblio.pm,1.92,1.93


From: Joshua Ferraro
Subject: [Koha-cvs] CVS: koha/C4 Biblio.pm,1.92,1.93
Date: Fri, 11 Jun 2004 08:38:13 -0700

Update of /cvsroot/koha/koha/C4
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv13674

Modified Files:
        Biblio.pm 
Log Message:
Changes MARCaddword to index words >= 1 char ... needed for more accurate
searches using SearchMarc routines.


Index: Biblio.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/Biblio.pm,v
retrieving revision 1.92
retrieving revision 1.93
diff -C2 -r1.92 -r1.93
*** Biblio.pm   10 Jun 2004 08:29:01 -0000      1.92
--- Biblio.pm   11 Jun 2004 15:38:06 -0000      1.93
***************
*** 951,956 ****
                        values (?,?,?,?,?,?,soundex(?))");
      foreach my $word (@words) {
! # we record only words longer than 2 car and not in stopwords hash
!       if (length($word)>2 and !($stopwords->{uc($word)})) {
            
$sth->execute($bibid,$tag,$tagorder,$subfieldid,$subfieldorder,$word,$word);
            if ($sth->err()) {
--- 951,956 ----
                        values (?,?,?,?,?,?,soundex(?))");
      foreach my $word (@words) {
! # we record only words one char long and not in stopwords hash
!       if (length($word)>=1 and !($stopwords->{uc($word)})) {
            
$sth->execute($bibid,$tag,$tagorder,$subfieldid,$subfieldorder,$word,$word);
            if ($sth->err()) {
***************
*** 2192,2195 ****
--- 2192,2199 ----
  # $Id$
  # $Log$
+ # Revision 1.93  2004/06/11 15:38:06  joshferraro
+ # Changes MARCaddword to index words >= 1 char ... needed for more accurate
+ # searches using SearchMarc routines.
+ #
  # Revision 1.92  2004/06/10 08:29:01  tipaul
  # MARC authority management (continued)




reply via email to

[Prev in Thread] Current Thread [Next in Thread]