[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-cvs] CVS: koha/admin aqbookfund.pl,1.19.2.3,1.19.2.4
From: |
Paul POULAIN |
Subject: |
[Koha-cvs] CVS: koha/admin aqbookfund.pl,1.19.2.3,1.19.2.4 |
Date: |
Fri, 09 Sep 2005 01:39:20 -0700 |
Update of /cvsroot/koha/koha/admin
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv16596/admin
Modified Files:
Tag: rel_2_2
aqbookfund.pl
Log Message:
backporting branchcode save, forgotten during head => 2.2 backport
Index: aqbookfund.pl
===================================================================
RCS file: /cvsroot/koha/koha/admin/aqbookfund.pl,v
retrieving revision 1.19.2.3
retrieving revision 1.19.2.4
diff -C2 -r1.19.2.3 -r1.19.2.4
*** aqbookfund.pl 26 Aug 2005 12:21:49 -0000 1.19.2.3
--- aqbookfund.pl 9 Sep 2005 08:39:17 -0000 1.19.2.4
***************
*** 164,169 ****
$sth->execute($bookfundid);
$sth->finish;
! my $sth=$dbh->prepare("replace aqbookfund (bookfundid,bookfundname)
values (?,?)");
!
$sth->execute($input->param('bookfundid'),$input->param('bookfundname'));
$sth->finish;
print "Content-Type: text/html\n\n<META HTTP-EQUIV=Refresh CONTENT=\"0;
URL=aqbookfund.pl\"></html>";
--- 164,169 ----
$sth->execute($bookfundid);
$sth->finish;
! my $sth=$dbh->prepare("replace aqbookfund
(bookfundid,bookfundname,branchcode) values (?,?,?)");
!
$sth->execute($input->param('bookfundid'),$input->param('bookfundname'),$input->param('branchcode'));
$sth->finish;
print "Content-Type: text/html\n\n<META HTTP-EQUIV=Refresh CONTENT=\"0;
URL=aqbookfund.pl\"></html>";
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Koha-cvs] CVS: koha/admin aqbookfund.pl,1.19.2.3,1.19.2.4,
Paul POULAIN <=