summaryrefslogtreecommitdiffstats
path: root/adduser/rmuser.perl
diff options
context:
space:
mode:
authorAndrey A. Chernov <ache@FreeBSD.org>1996-12-07 21:25:12 +0000
committerAndrey A. Chernov <ache@FreeBSD.org>1996-12-07 21:25:12 +0000
commite093626f705fe9d212293d983fdfd47b4ca3a1a5 (patch)
treea74fb4ced759b718b3f05bc6ef37a0e7054a864a /adduser/rmuser.perl
parentf0d8c90004acbc4373ad2cc9391ddf1151fefa5e (diff)
downloadpw-darwin-e093626f705fe9d212293d983fdfd47b4ca3a1a5.tar.gz
pw-darwin-e093626f705fe9d212293d983fdfd47b4ca3a1a5.tar.zst
pw-darwin-e093626f705fe9d212293d983fdfd47b4ca3a1a5.zip
Expand username limit to 16
Diffstat (limited to 'adduser/rmuser.perl')
-rw-r--r--adduser/rmuser.perl6
1 files changed, 3 insertions, 3 deletions
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 <ghelmer@alpha.dsu.edu>, 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;
}