diff options
author | ivan <ivan> | 2002-04-19 23:25:54 +0000 |
---|---|---|
committer | ivan <ivan> | 2002-04-19 23:25:54 +0000 |
commit | 167292308b03b20e5e2ba790491ee28a3af85578 (patch) | |
tree | c9ee2f61a28b4f597ded8686141320d4f4d8b0f3 | |
parent | 052bf748cb464e2fb8d5ea0188533bba829a725e (diff) |
maybe just for debugging
-rw-r--r-- | FS/FS/svc_acct.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/FS/FS/svc_acct.pm b/FS/FS/svc_acct.pm index 7fcfd35df..d3c415ce3 100644 --- a/FS/FS/svc_acct.pm +++ b/FS/FS/svc_acct.pm @@ -531,11 +531,11 @@ sub check { my $ulen = $usernamemax || $self->dbdef_table->column('username')->length; if ( $username_uppercase ) { $recref->{username} =~ /^([a-z0-9_\-\.\&]{$usernamemin,$ulen})$/i - or return gettext('illegal_username'). ": ". $recref->{username}; + or return gettext('illegal_username'). " ($usernamemin-$ulen): ". $recref->{username}; $recref->{username} = $1; } else { $recref->{username} =~ /^([a-z0-9_\-\.\&]{$usernamemin,$ulen})$/ - or return gettext('illegal_username'). ": ". $recref->{username}; + or return gettext('illegal_username'). " ($usernamemin-$ulen): ". $recref->{username}; $recref->{username} = $1; } |