[Top][All Lists]
[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)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Koha-cvs] CVS: koha/C4 Biblio.pm,1.92,1.93,
Joshua Ferraro <=