[Koha-cvs] CVS: koha/html-template search.pl,1.15,1.16

Chris Cormack rangi at users.sourceforge.net
Sun May 19 23:27:14 CEST 2002


Update of /cvsroot/koha/koha/html-template
In directory usw-pr-cvs1:/tmp/cvs-serv28563

Modified Files:
	search.pl 
Log Message:
Adding in publisher and abstract as search fields


Index: search.pl
===================================================================
RCS file: /cvsroot/koha/koha/html-template/search.pl,v
retrieving revision 1.15
retrieving revision 1.16
diff -C2 -r1.15 -r1.16
*** search.pl	15 May 2002 04:16:37 -0000	1.15
--- search.pl	19 May 2002 21:27:12 -0000	1.16
***************
*** 76,79 ****
--- 76,84 ----
  my $title=$query->param('title');
  $search{'title'}=$title;
+ my $abstract=$query->param('abstract');
+ $search{'abstract'}=$abstract;
+ my $publisher=$query->param('publisher');
+ $search{'publisher'}=$publisher;
+ 
  my $ttype=$query->param('ttype');
  $search{'ttype'}=$ttype;
***************
*** 92,95 ****
--- 97,102 ----
  ($title) && (push @$forminputs, { line => "title=$title"});
  ($ttype) && (push @$forminputs, { line => "ttype=$ttype"});
+ ($abstract) && (push @$forminputs, { line => "abstract=$abstract"});
+ ($publisher) && (push @$forminputs, { line => "publisher=$publisher"});
  $template->param(FORMINPUTS => $forminputs);
  # whats this for?
***************
*** 97,101 ****
  $search{'front'}=$query->param('front');
  
! my $num=20;
  my ($count, at results)=catalogsearch($env,'',\%search,$num,$startfrom);
  
--- 104,108 ----
  $search{'front'}=$query->param('front');
  
! my $num=10;
  my ($count, at results)=catalogsearch($env,'',\%search,$num,$startfrom);
  
***************
*** 125,132 ****
  $search=~ s/ /%20/g;
  $template->param(startfrom => $startfrom+1);
! $template->param(endat => $startfrom+20);
  $template->param(numrecords => $count);
! my $nextstartfrom=($startfrom+20<$count-20) ? ($startfrom+20) : ($count-20);
! my $prevstartfrom=($startfrom-20>0) ? ($startfrom-20) : (0);
  $template->param(nextstartfrom => $nextstartfrom);
  $template->param(prevstartfrom => $prevstartfrom);
--- 132,139 ----
  $search=~ s/ /%20/g;
  $template->param(startfrom => $startfrom+1);
! $template->param(endat => $startfrom+$num);
  $template->param(numrecords => $count);
! my $nextstartfrom=($startfrom+$num<$count-$num) ? ($startfrom+$num) : ($count-$num);
! my $prevstartfrom=($startfrom-$num>0) ? ($startfrom-$num) : (0);
  $template->param(nextstartfrom => $nextstartfrom);
  $template->param(prevstartfrom => $prevstartfrom);





More information about the Koha-cvs mailing list