[Koha-cvs] CVS: koha/opac opac-search.pl,1.8,1.9

[Serge Renaux]

Update of /cvsroot/koha/koha/opac
In directory sc8-pr-cvs1:/tmp/cvs-serv16929

Modified Files:
	opac-search.pl 
Log Message:
Fix for bug #496


Index: opac-search.pl
===================================================================
RCS file: /cvsroot/koha/koha/opac/opac-search.pl,v
retrieving revision 1.8
retrieving revision 1.9
diff -C2 -r1.8 -r1.9
*** opac-search.pl	2 Feb 2003 07:18:38 -0000	1.8
--- opac-search.pl	18 Jun 2003 08:38:34 -0000	1.9
***************
*** 13,20 ****
  
  my $dbh=C4::Context->dbh;
! my $sth=$dbh->prepare("select groupname,itemtypes from itemtypesearchgroups order by groupname");
  $sth->execute;
! while (my ($groupname,$itemtypes) = $sth->fetchrow) {
!     $classlist.="<option value=\"$itemtypes\">$groupname\n";
  }
  
--- 13,20 ----
  
  my $dbh=C4::Context->dbh;
! my $sth=$dbh->prepare("select description,itemtype from itemtypes order by description");
  $sth->execute;
! while (my ($description,$itemtype) = $sth->fetchrow) {
!     $classlist.="<option value=\"$itemtype\">$description\n";
  }
  
***************
*** 22,26 ****
  my $query = new CGI;
  
! my ($template, $borrowernumber, $cookie) 
      = get_template_and_user({template_name => "opac-search.tmpl",
  			     query => $query,
--- 22,26 ----
  my $query = new CGI;
  
! my ($template, $borrowernumber, $cookie)
      = get_template_and_user({template_name => "opac-search.tmpl",
  			     query => $query,