[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-cvs] CVS: koha/C4 Input.pm,1.1.1.1.2.3,1.1.1.1.2.4
From: |
Steve Tonnesen |
Subject: |
[Koha-cvs] CVS: koha/C4 Input.pm,1.1.1.1.2.3,1.1.1.1.2.4 |
Date: |
Thu, 04 Jul 2002 21:45:16 -0700 |
Update of /cvsroot/koha/koha/C4
In directory usw-pr-cvs1:/tmp/cvs-serv28857
Modified Files:
Tag: rel-1-2
Input.pm
Log Message:
Fixed logic bug in checkvalidisbn routine
Index: Input.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/Input.pm,v
retrieving revision 1.1.1.1.2.3
retrieving revision 1.1.1.1.2.4
diff -C2 -r1.1.1.1.2.3 -r1.1.1.1.2.4
*** Input.pm 3 Jul 2002 03:02:53 -0000 1.1.1.1.2.3
--- Input.pm 5 Jul 2002 04:45:13 -0000 1.1.1.1.2.4
***************
*** 73,77 ****
for ($i=0; $i<9; $i++) {
my $digit=substr($q,$i,1);
! $c+=$digit*(10-$i);
}
$c=$c%11; # % is the modulus function
--- 73,77 ----
for ($i=0; $i<9; $i++) {
my $digit=substr($q,$i,1);
! $c+=$digit*($i+1);
}
$c=$c%11; # % is the modulus function
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Koha-cvs] CVS: koha/C4 Input.pm,1.1.1.1.2.3,1.1.1.1.2.4,
Steve Tonnesen <=
- Prev by Date:
[Koha-cvs] CVS: koha/C4 Auth.pm,1.3,1.4
- Next by Date:
[Koha-cvs] CVS: koha logout.pl,1.1,1.2 shelves.pl,1.6,1.7
- Previous by thread:
[Koha-cvs] CVS: koha/C4 Auth.pm,1.3,1.4
- Next by thread:
[Koha-cvs] CVS: koha logout.pl,1.1,1.2 shelves.pl,1.6,1.7
- Index(es):