diff options
| author | Andrey A. Chernov <ache@FreeBSD.org> | 1996-12-07 21:25:12 +0000 |
|---|---|---|
| committer | Andrey A. Chernov <ache@FreeBSD.org> | 1996-12-07 21:25:12 +0000 |
| commit | 2f71230e78e8c924cd29fb09cb45feb09aa8eb48 (patch) | |
| tree | e88a1af614f1cc80b0e9d86f23cdee9b4c236f3a /usr.sbin/adduser/adduser.perl | |
| parent | 37e5b2c618cf93cca6343aaa8da51ab5bfed2ef4 (diff) | |
| download | src-2f71230e78e8c924cd29fb09cb45feb09aa8eb48.tar.gz src-2f71230e78e8c924cd29fb09cb45feb09aa8eb48.zip | |
Expand username limit to 16
Notes
Notes:
svn path=/head/; revision=20196
Diffstat (limited to 'usr.sbin/adduser/adduser.perl')
| -rw-r--r-- | usr.sbin/adduser/adduser.perl | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/usr.sbin/adduser/adduser.perl b/usr.sbin/adduser/adduser.perl index 21227b1b5742..7c5cd98119db 100644 --- a/usr.sbin/adduser/adduser.perl +++ b/usr.sbin/adduser/adduser.perl @@ -24,7 +24,7 @@ # OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF # SUCH DAMAGE. # -# $Id: adduser.perl,v 1.20 1996/11/20 01:07:46 wosch Exp $ +# $Id: adduser.perl,v 1.21 1996/11/27 22:04:55 ache Exp $ # read variables @@ -307,9 +307,9 @@ sub new_users_name { local($name); while(1) { - $name = &confirm_list("Enter username", 1, "a-z0-9", ""); - if (length($name) > 8) { - warn "Username is longer than 8 chars\a\n"; + $name = &confirm_list("Enter username", 1, "A-Za-z0-9_", ""); + if (length($name) > 16) { + warn "Username is longer than 16 chars\a\n"; next; } last if (&new_users_name_valid($name) eq $name); |