summaryrefslogtreecommitdiff
path: root/pinyweb/cgi-bin/auth/newpass.cgi
diff options
context:
space:
mode:
Diffstat (limited to 'pinyweb/cgi-bin/auth/newpass.cgi')
-rwxr-xr-xpinyweb/cgi-bin/auth/newpass.cgi2
1 files changed, 1 insertions, 1 deletions
diff --git a/pinyweb/cgi-bin/auth/newpass.cgi b/pinyweb/cgi-bin/auth/newpass.cgi
index 1031820..b367558 100755
--- a/pinyweb/cgi-bin/auth/newpass.cgi
+++ b/pinyweb/cgi-bin/auth/newpass.cgi
@@ -30,7 +30,7 @@ foreach my $n ( 1 .. 16 ) {
$salt .= "\$";
-my $crypt = crypt( $q->param('p'), $salt );
+my $crypt = crypt( scalar( $q->param('p') ), $salt );
unless ( system( '/usr/sbin/piny-suid', $ENV{'REMOTE_USER'}, 'newpasshash', $crypt ) == 0 ) {
die( 'newpass was unsuccessful.' );