diff options
author | ivan <ivan> | 2004-04-09 22:29:33 +0000 |
---|---|---|
committer | ivan <ivan> | 2004-04-09 22:29:33 +0000 |
commit | 7db53b9364a0f78620f156d7c511facf57343e3d (patch) | |
tree | a145afae3e0a1589066713f653757e729e5fd322 /fs_passwd | |
parent | 42b77edd5f8c054b1a05511d09563b9a663cfc14 (diff) |
oops, this one too
Diffstat (limited to 'fs_passwd')
-rwxr-xr-x | fs_passwd/fs_passwd.cgi | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/fs_passwd/fs_passwd.cgi b/fs_passwd/fs_passwd.cgi index 34a33c7f5..38b70d0cf 100755 --- a/fs_passwd/fs_passwd.cgi +++ b/fs_passwd/fs_passwd.cgi @@ -22,6 +22,9 @@ my $cgi = new CGI; $cgi->param('username') =~ /^([^\n]{0,255}$)/ or die "Illegal username"; my $me = $1; +$cgi->param('domain') =~ /^([^\n]{0,255}$)/ or die "Illegal domain"; +my $domain = $1; + $cgi->param('old_password') =~ /^([^\n]{0,255}$)/ or die "Illegal old_password"; my $old_password = $1; @@ -33,6 +36,7 @@ die "New passwords don't match" my $rv = passwd( 'username' => $me, + 'domain' => $domain, 'old_password' => $old_password, 'new_password' => $new_password, ); |