[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;