oops, one last LECB change
authorivan <ivan>
Fri, 22 Nov 2002 10:48:34 +0000 (10:48 +0000)
committerivan <ivan>
Fri, 22 Nov 2002 10:48:34 +0000 (10:48 +0000)
FS/FS/cust_main.pm

index a8b1dc2..237abcd 100644 (file)
@@ -667,7 +667,7 @@ sub check {
     }
   }
 
-  $self->payby =~ /^(CARD|CHEK|BILL|COMP|PREPAY)$/
+  $self->payby =~ /^(CARD|CHEK|LECB|BILL|COMP|PREPAY)$/
     or return "Illegal payby: ". $self->payby;
   $self->payby($1);