From 1794b275b9bd447f812a76e0d81583558846fa3c Mon Sep 17 00:00:00 2001 From: "Andrey A. Chernov" Date: Sat, 7 Dec 1996 21:25:12 +0000 Subject: Expand username limit to 16 --- adduser/rmuser.perl | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'adduser/rmuser.perl') diff --git a/adduser/rmuser.perl b/adduser/rmuser.perl index d556eff..c55862a 100644 --- a/adduser/rmuser.perl +++ b/adduser/rmuser.perl @@ -30,7 +30,7 @@ # # Guy Helmer , 07/17/96 # -# $Id: removeuser.perl,v 1.2 1996/08/11 13:03:25 wosch Exp $ +# $Id: rmuser.perl,v 1.1 1996/11/17 03:51:33 wosch Exp $ sub LOCK_SH {0x01;} sub LOCK_EX {0x02;} @@ -231,8 +231,8 @@ sub get_login_name { chop $login_name; if (!($login_name =~ /[A-Za-z0-9_]/)) { print STDERR "Sorry, login name must contain alphanumeric characters only.\n"; - } elsif (length($login_name) > 8 || length($login_name) == 0) { - print STDERR "Sorry, login name must be eight characters or less.\n"; + } elsif (length($login_name) > 16 || length($login_name) == 0) { + print STDERR "Sorry, login name must be 16 characters or less.\n"; } else { $done = 1; } -- cgit v1.2.3