[Koha-cvs] CVS: koha mancredit.pl,1.9,1.10 maninvoice.pl,1.7,1.8

Paul POULAIN tipaul at users.sourceforge.net
Wed Apr 23 14:20:36 CEST 2003


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

Modified Files:
	mancredit.pl maninvoice.pl 
Log Message:
fix for #297 and some others bugs

Index: mancredit.pl
===================================================================
RCS file: /cvsroot/koha/koha/mancredit.pl,v
retrieving revision 1.9
retrieving revision 1.10
diff -C2 -r1.9 -r1.10
*** mancredit.pl	2 Feb 2003 07:18:37 -0000	1.9
--- mancredit.pl	23 Apr 2003 12:20:26 -0000	1.10
***************
*** 44,48 ****
    my $type=$input->param('type');
    manualinvoice($bornum,$itemnum,$desc,$type,$amount);
!   print $input->redirect("/cgi-bin/koha/moremember.pl?bornum=$bornum");
  } else {
  	my ($template, $loggedinuser, $cookie)
--- 44,48 ----
    my $type=$input->param('type');
    manualinvoice($bornum,$itemnum,$desc,$type,$amount);
!   print $input->redirect("/cgi-bin/koha/boraccount.pl?bornum=$bornum");
  } else {
  	my ($template, $loggedinuser, $cookie)

Index: maninvoice.pl
===================================================================
RCS file: /cvsroot/koha/koha/maninvoice.pl,v
retrieving revision 1.7
retrieving revision 1.8
diff -C2 -r1.7 -r1.8
*** maninvoice.pl	2 Feb 2003 07:18:37 -0000	1.7
--- maninvoice.pl	23 Apr 2003 12:20:27 -0000	1.8
***************
*** 44,48 ****
    my $type=$input->param('type');
    manualinvoice($bornum,$itemnum,$desc,$type,$amount);
!   print $input->redirect("/cgi-bin/koha/moremember.pl?bornum=$bornum");
  } else {
  	my ($template, $loggedinuser, $cookie)
--- 44,48 ----
    my $type=$input->param('type');
    manualinvoice($bornum,$itemnum,$desc,$type,$amount);
!   print $input->redirect("/cgi-bin/koha/boraccount.pl?bornum=$bornum");
  } else {
  	my ($template, $loggedinuser, $cookie)





More information about the Koha-cvs mailing list