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

Joshua Ferraro joshferraro at users.sourceforge.net
Fri Jun 11 17:38:13 CEST 2004


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)





More information about the Koha-cvs mailing list