[Koha-cvs] CVS: koha/acqui acquire.pl,1.14,1.15 newbiblio.pl,1.14,1.15

[Paul POULAIN]

Update of /cvsroot/koha/koha/acqui
In directory sc8-pr-cvs1:/tmp/cvs-serv17960/acqui

Modified Files:
	acquire.pl newbiblio.pl 
Log Message:
sync'ing with rel_2_0 (mostly prepare/execute pb, bug #662)

Index: acquire.pl
===================================================================
RCS file: /cvsroot/koha/koha/acqui/acquire.pl,v
retrieving revision 1.14
retrieving revision 1.15
diff -C2 -r1.14 -r1.15
*** acquire.pl	22 Apr 2003 10:22:19 -0000	1.14
--- acquire.pl	22 Dec 2003 19:16:59 -0000	1.15
***************
*** 61,66 ****
  $template->param($count);
  if ($count == 1){
! 	my $query="Select itemtype,description from itemtypes order by description";
! 	my $sth=$dbh->prepare($query);
  	$sth->execute;
  	my  @itemtype;
--- 61,65 ----
  $template->param($count);
  if ($count == 1){
! 	my $sth=$dbh->prepare("Select itemtype,description from itemtypes order by description");
  	$sth->execute;
  	my  @itemtype;

Index: newbiblio.pl
===================================================================
RCS file: /cvsroot/koha/koha/acqui/newbiblio.pl,v
retrieving revision 1.14
retrieving revision 1.15
diff -C2 -r1.14 -r1.15
*** newbiblio.pl	8 Jul 2003 16:20:15 -0000	1.14
--- newbiblio.pl	22 Dec 2003 19:16:59 -0000	1.15
***************
*** 79,84 ****
  }
  
! my $query="Select itemtype,description from itemtypes order by description";
! my $sth=$dbh->prepare($query);
  $sth->execute;
  my  @itemtype;
--- 79,83 ----
  }
  
! my $sth=$dbh->prepare("Select itemtype,description from itemtypes order by description");
  $sth->execute;
  my  @itemtype;