diff options
| author | jrayhawk+piny.be@omgwallhack.org <jrayhawk+piny.be@omgwallhack.org> | 2011-04-27 20:01:39 -0700 |
|---|---|---|
| committer | jrayhawk+piny.be@omgwallhack.org <jrayhawk+piny.be@omgwallhack.org> | 2011-04-27 20:01:39 -0700 |
| commit | a6f148c4c72b0242ed11a52cf6b2ad30bbeb2028 (patch) | |
| tree | 3978471bb9c65a0de3e4e93e2a8fa9b2d99be89e /pinyweb | |
| parent | d49f1aac6be76650ada9d9b26c85578b5d7d83e7 (diff) | |
| download | piny-code-a6f148c4c72b0242ed11a52cf6b2ad30bbeb2028.tar.gz piny-code-a6f148c4c72b0242ed11a52cf6b2ad30bbeb2028.zip | |
newuser.cgi: switching Convert::Base32 syntax over to MIME::Base32 syntax
Diffstat (limited to 'pinyweb')
| -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 ) { |