summaryrefslogtreecommitdiff
path: root/fs_passwd
diff options
context:
space:
mode:
authorivan <ivan>2004-04-09 22:29:33 +0000
committerivan <ivan>2004-04-09 22:29:33 +0000
commit7db53b9364a0f78620f156d7c511facf57343e3d (patch)
treea145afae3e0a1589066713f653757e729e5fd322 /fs_passwd
parent42b77edd5f8c054b1a05511d09563b9a663cfc14 (diff)
oops, this one too
Diffstat (limited to 'fs_passwd')
-rwxr-xr-xfs_passwd/fs_passwd.cgi4
1 files changed, 4 insertions, 0 deletions
diff --git a/fs_passwd/fs_passwd.cgi b/fs_passwd/fs_passwd.cgi
index 34a33c7..38b70d0 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,
);