From b0460b1b8fb61569d20cbd4ac75ae6976bd34a92 Mon Sep 17 00:00:00 2001 From: Guilhem Moulin Date: Thu, 3 May 2012 18:18:55 +0200 Subject: =?UTF-8?q?=E2=80=98IO::Prompt=E2=80=99=20is=20deprecacted;=20Migr?= =?UTF-8?q?ating=20to=20=E2=80=98IO::Prompter=E2=80=99=20(by=20the=20same?= =?UTF-8?q?=20author).?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- lib/Fripost/Password.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'lib/Fripost/Password.pm') diff --git a/lib/Fripost/Password.pm b/lib/Fripost/Password.pm index 53a10f7..fc1f7ce 100755 --- a/lib/Fripost/Password.pm +++ b/lib/Fripost/Password.pm @@ -33,9 +33,9 @@ our @ISA = qw(Exporter); # CRYPT - since it requires salt). # If `$salt' is `undef', the salt is automatically generated, using the # subroutine `&make_salt' below. -sub hash ($$$) { +sub hash { - my ($h, $salt, $pw) = @_; + my ($pw, $h, $salt) = @_; $h //= SHA1; # Treat the schemes that don't use Digest::.. separetely. -- cgit v1.2.3