[Koha-cvs] CVS: koha newjmember.pl,1.10,1.10.2.1
Chris Cormack
rangi at users.sourceforge.net
Wed Apr 28 11:31:32 CEST 2004
Update of /cvsroot/koha/koha
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv4994
Modified Files:
Tag: rel_2_0
newjmember.pl
Log Message:
Fix for bug 729
Index: newjmember.pl
===================================================================
RCS file: /cvsroot/koha/koha/Attic/newjmember.pl,v
retrieving revision 1.10
retrieving revision 1.10.2.1
diff -C2 -r1.10 -r1.10.2.1
*** newjmember.pl 28 Nov 2003 12:51:26 -0000 1.10
--- newjmember.pl 28 Apr 2004 09:31:20 -0000 1.10.2.1
***************
*** 3,7 ****
# $Id$
! #script to print confirmation screen, then if accepted calls itself to insert data
# FIXME - Yes, but what does it _do_?
# 2002/12/18 hdl at ifrance.comTemplating
--- 3,7 ----
# $Id$
! # script to print confirmation screen, then if accepted calls itself to insert data
# FIXME - Yes, but what does it _do_?
# 2002/12/18 hdl at ifrance.comTemplating
***************
*** 96,100 ****
$nounique = 1;
}
! my $valid=checkdigit(\%env,$data{'cardnumber'}, $nounique);
if ($valid != 1){
$string.=" Invalid Cardnumber $number<br>";
--- 96,100 ----
$nounique = 1;
}
! my $valid=checkdigit(\%env,$number, $nounique);
if ($valid != 1){
$string.=" Invalid Cardnumber $number<br>";
More information about the Koha-cvs
mailing list