[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;
        }