[Koha-cvs] CVS: koha/search.marc search.pl,1.5,1.6

[Paul POULAIN]

Update of /cvsroot/koha/koha/search.marc
In directory sc8-pr-cvs1:/tmp/cvs-serv11298/search.marc

Modified Files:
	search.pl 
Log Message:
MARC search fixes and improvements. Now, ALL searches are indexed and should be very fast with any statement.
a few improvments, and it will be useable even with a NON-MARC installation of koha.

Index: search.pl
===================================================================
RCS file: /cvsroot/koha/koha/search.marc/search.pl,v
retrieving revision 1.5
retrieving revision 1.6
diff -C2 -r1.5 -r1.6
*** search.pl	6 Feb 2003 07:05:51 -0000	1.5
--- search.pl	4 Mar 2003 16:15:16 -0000	1.6
***************
*** 36,40 ****
  my $type=$query->param('type');
  my $op = $query->param('op');
- #$type="opac" unless $type;
  
  my $dbh = C4::Context->dbh;
--- 36,39 ----
***************
*** 59,64 ****
  		push @subfields, substr($marc,3,1);
  	}
! 	my @results = catalogsearch($dbh, \@tags, \@subfields, \@and_or, 
! 											\@excluding, \@operator, \@value, 
  											$startfrom, 20);
  	($template, $loggedinuser, $cookie)
--- 58,63 ----
  		push @subfields, substr($marc,3,1);
  	}
! 	my @results = catalogsearch($dbh, \@tags, \@subfields, \@and_or,
! 											\@excluding, \@operator, \@value,
  											$startfrom, 20);
  	($template, $loggedinuser, $cookie)