diff options
author | ivan <ivan> | 2006-08-18 12:18:19 +0000 |
---|---|---|
committer | ivan <ivan> | 2006-08-18 12:18:19 +0000 |
commit | 96301defaaafd4260c7282a3a4e1b4d29fcd85c8 (patch) | |
tree | 7dd8b67cd754ed3f9f58bc4ee3dc1e9748da46b7 | |
parent | aa69b255a6b5abe6117ad864b7521d498a618a3c (diff) |
and a slight fix to the CSV import
-rw-r--r-- | FS/FS/cust_main.pm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/FS/FS/cust_main.pm b/FS/FS/cust_main.pm index fd66f145c..96241801e 100644 --- a/FS/FS/cust_main.pm +++ b/FS/FS/cust_main.pm @@ -4395,7 +4395,7 @@ sub batch_import { cust_pkg.pkgpart svc_acct.username svc_acct._password ); - $payby = 'CARD'; + $payby = 'BILL'; } else { die "unknown format $format"; } @@ -4484,6 +4484,8 @@ sub batch_import { } } + $cust_main{'payby'} = 'CARD' if length($cust_main{'payinfo'}); + my $invoicing_list = $cust_main{'invoicing_list'} ? [ delete $cust_main{'invoicing_list'} ] : []; |