[Koha-cvs] CVS: koha/C4 Input.pm,1.2,1.3
Steve Tonnesen
tonnesen at users.sourceforge.net
Wed Jul 3 05:18:53 CEST 2002
Update of /cvsroot/koha/koha/C4
In directory usw-pr-cvs1:/tmp/cvs-serv14168
Modified Files:
Input.pm
Log Message:
Fixed bug in checkvalidisbn()
Index: Input.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/Input.pm,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -r1.2 -r1.3
*** Input.pm 20 Jun 2002 20:41:21 -0000 1.2
--- Input.pm 3 Jul 2002 03:18:50 -0000 1.3
***************
*** 75,79 ****
$c+=$digit*(10-$i);
}
! $c=int(11-($c/11-int($c/11))*11+.1);
($c==10) && ($c='X');
if ($c eq $checksum) {
--- 75,79 ----
$c+=$digit*(10-$i);
}
! $c=$c%11; # % is the modulus function
($c==10) && ($c='X');
if ($c eq $checksum) {
More information about the Koha-cvs
mailing list