[Koha-cvs] CVS: koha/C4 Input.pm,1.14,1.15

[Chris Cormack]

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

Modified Files:
	Input.pm 
Log Message:
Fix for bug 618
duplicate cardnumber checking


Index: Input.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/Input.pm,v
retrieving revision 1.14
retrieving revision 1.15
diff -C2 -r1.14 -r1.15
*** Input.pm	7 Jul 2003 14:43:42 -0000	1.14
--- Input.pm	25 Sep 2003 09:23:26 -0000	1.15
***************
*** 69,73 ****
  =item checkdigit
  
!   $valid = &checkdigit($env, $cardnumber);
  
  Takes a card number, computes its check digit, and compares it to the
--- 69,73 ----
  =item checkdigit
  
!   $valid = &checkdigit($env, $cardnumber $nounique);
  
  Takes a card number, computes its check digit, and compares it to the
***************
*** 91,97 ****
  	#not correct
  
- 	if (C4::Context->preference("checkdigit") eq "none") {
- 		return 1;
- 	}
  	unless ( $nounique )
  	{
--- 91,94 ----
***************
*** 105,108 ****
--- 102,108 ----
  			return 0;
  		}
+ 	}
+ 	if (C4::Context->preference("checkdigit") eq "none") {
+ 		return 1;
  	}