From e093626f705fe9d212293d983fdfd47b4ca3a1a5 Mon Sep 17 00:00:00 2001
From: "Andrey A. Chernov" <ache@FreeBSD.org>
Date: Sat, 7 Dec 1996 21:25:12 +0000
Subject: Expand username limit to 16

---
 adduser/adduser.perl | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

(limited to 'adduser/adduser.perl')

diff --git a/adduser/adduser.perl b/adduser/adduser.perl
index 21227b1..7c5cd98 100644
--- a/adduser/adduser.perl
+++ b/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);
-- 
cgit v1.2.3-56-ge451