diff options
author | mark <mark> | 2012-02-19 02:30:17 +0000 |
---|---|---|
committer | mark <mark> | 2012-02-19 02:30:17 +0000 |
commit | 6fc993993d45b0e151a2c3383ef1031f817715ff (patch) | |
tree | 441a3596c5891753c4e89fbc7326d09585738e75 /FS/FS/svc_acct.pm | |
parent | e010976ba33c00bb2b97d677f610e4b19571feaf (diff) |
more per-agent options, #15973
Diffstat (limited to 'FS/FS/svc_acct.pm')
-rw-r--r-- | FS/FS/svc_acct.pm | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/FS/FS/svc_acct.pm b/FS/FS/svc_acct.pm index 82a5a8a..139f927 100644 --- a/FS/FS/svc_acct.pm +++ b/FS/FS/svc_acct.pm @@ -1163,6 +1163,7 @@ sub check { my $cust_pkg; local $username_letter = $username_letter; + local $username_uppercase = $username_uppercase; if ($self->svcnum) { my $cust_svc = $self->cust_svc or return "no cust_svc record found for svcnum ". $self->svcnum; @@ -1174,6 +1175,8 @@ sub check { if ($cust_pkg) { $username_letter = $conf->exists('username-letter', $cust_pkg->cust_main->agentnum); + $username_uppercase = + $conf->exists('username-uppercase', $cust_pkg->cust_main->agentnum); } my $ulen = $usernamemax || $self->dbdef_table->column('username')->length; |