summaryrefslogtreecommitdiffstats
path: root/usr.sbin/adduser/adduser.perl
diff options
context:
space:
mode:
authorache <ache@FreeBSD.org>1996-12-07 21:25:12 +0000
committerache <ache@FreeBSD.org>1996-12-07 21:25:12 +0000
commitba8fcf69ff169cf6da03e78c66c56af5880a4849 (patch)
treee88a1af614f1cc80b0e9d86f23cdee9b4c236f3a /usr.sbin/adduser/adduser.perl
parentc48212278f5e92de11094dcfba0ac92e6d713eb3 (diff)
downloadFreeBSD-src-ba8fcf69ff169cf6da03e78c66c56af5880a4849.zip
FreeBSD-src-ba8fcf69ff169cf6da03e78c66c56af5880a4849.tar.gz
Expand username limit to 16
Diffstat (limited to 'usr.sbin/adduser/adduser.perl')
-rw-r--r--usr.sbin/adduser/adduser.perl8
1 files changed, 4 insertions, 4 deletions
diff --git a/usr.sbin/adduser/adduser.perl b/usr.sbin/adduser/adduser.perl
index 21227b1..7c5cd98 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);
OpenPOWER on IntegriCloud