diff options
| -rwxr-xr-x | pinyweb/cgi-bin/newuser.cgi | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/pinyweb/cgi-bin/newuser.cgi b/pinyweb/cgi-bin/newuser.cgi index 0fad219..43c9178 100755 --- a/pinyweb/cgi-bin/newuser.cgi +++ b/pinyweb/cgi-bin/newuser.cgi @@ -27,11 +27,11 @@ if( $q->param("n") && $q->param("a") && $q->param("p") ) { my $code; if ( $q->param("h") ) { - $pass = $cipher->decrypt( decode_base32( $pass ) ); + $pass = $cipher->decrypt( MIME::Base32::decode( $pass ) ); $code = $auth->hash( { "n" => $q->param( "n" ), "a" => $q->param( "a" ), "p" => $pass } ); } else { $code = $auth->hash( { "n" => $q->param( "n" ), "a" => $q->param( "a" ), "p" => $pass } ); - $pass = encode_base32( $cipher->encrypt( $pass ) ); + $pass = MIME::Base32::encode( $cipher->encrypt( $pass ) ); }; if ( $q->param("h") && $q->param("h") eq $code ) { |