diff options
author | Sebastian Schmelzer | 2012-04-11 19:27:16 +0200 |
---|---|---|
committer | Sebastian Schmelzer | 2012-04-11 19:27:16 +0200 |
commit | 4b2c841c963339eb6621a34b0d8055e9d36da5e0 (patch) | |
tree | 84ce21e924c6c06f98d927c957933f4fc4ff20da | |
parent | update to new perl SHA library (diff) | |
download | core-4b2c841c963339eb6621a34b0d8055e9d36da5e0.tar.gz core-4b2c841c963339eb6621a34b0d8055e9d36da5e0.tar.xz core-4b2c841c963339eb6621a34b0d8055e9d36da5e0.zip |
update SHA lib v2
-rw-r--r-- | src/boot-env/OpenSLX/BootEnvironment/PXE.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/boot-env/OpenSLX/BootEnvironment/PXE.pm b/src/boot-env/OpenSLX/BootEnvironment/PXE.pm index a5bd7a62..251bd9bd 100644 --- a/src/boot-env/OpenSLX/BootEnvironment/PXE.pm +++ b/src/boot-env/OpenSLX/BootEnvironment/PXE.pm @@ -335,7 +335,7 @@ sub _sha1pass my $self = shift; my $pass = shift; my $salt = shift || MIME::Base64::encode($self->_random_bytes(6), ''); - $pass = Digest::SHA1::sha1_base64($salt, $pass); + $pass = Digest::SHA::sha1_base64($salt, $pass); return sprintf('$4$%s$%s$', $salt, $pass); } |