diff options
author | Mark Newton <newton@FreeBSD.org> | 2000-03-14 14:27:34 +0000 |
---|---|---|
committer | Mark Newton <newton@FreeBSD.org> | 2000-03-14 14:27:34 +0000 |
commit | 43445319ca0a78d2769b390a5271097013b5ad1e (patch) | |
tree | cc443f6faaa12c6e552103e933df914bea163161 /adduser/rmuser.perl | |
parent | 38930db3c455f2ca33ac528c63b299895f146aba (diff) | |
download | pw-darwin-43445319ca0a78d2769b390a5271097013b5ad1e.tar.gz pw-darwin-43445319ca0a78d2769b390a5271097013b5ad1e.tar.zst pw-darwin-43445319ca0a78d2769b390a5271097013b5ad1e.zip |
Un-botch my botched reduction in permitted characters in the permitted
username check which resulted from my attempt to expand them.
PR: bin/17372
Reviewed by: sheldonh
Diffstat (limited to 'adduser/rmuser.perl')
-rw-r--r-- | adduser/rmuser.perl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/adduser/rmuser.perl b/adduser/rmuser.perl index 67dfa33..8f6d56e 100644 --- a/adduser/rmuser.perl +++ b/adduser/rmuser.perl @@ -108,7 +108,7 @@ if ($#ARGV == 0) { # Username was given as a parameter $login_name = pop(@ARGV); die "Sorry, login name must contain alphanumeric characters only.\n" - if ($login_name !~ /^[a-zA-Z0-9_]{1,}$/); + if ($login_name !~ /^[a-zA-Z0-9_]\w*$/); } else { if ($affirm) { print STDERR "${whoami}: Error: -y option given without username!\n"; |