diff options
Diffstat (limited to 'fs_passwd/fs_passwd.cgi')
-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, ); |