Fix experimental warnings
authorMarius Gavrilescu <marius@ieval.ro>
Sat, 13 Jun 2015 10:36:30 +0000 (13:36 +0300)
committerMarius Gavrilescu <marius@ieval.ro>
Sat, 13 Jun 2015 10:36:30 +0000 (13:36 +0300)
lib/Apache2/Authen/Passphrase.pm

index 612e60515d792c24efa4fb0e8f690bf683b64701..5debb55607d64c95409e1a76638ca8a02452f4f0 100644 (file)
@@ -59,7 +59,7 @@ sub pwcheck{
        my $conf=LoadFile "$rootdir/$user.yml";
 
        ## no critic (RequireCarping)
-       die BAD_PASSWORD unless keys $conf;          # Empty hash means no such user
+       die BAD_PASSWORD unless keys %$conf;          # Empty hash means no such user
        die BAD_PASSWORD unless Authen::Passphrase->from_rfc2307($conf->{passphrase})->match($pass);
        ## use critic
        pwset $user, $pass if $conf->{passphrase_version} < PASSPHRASE_VERSION
This page took 0.010194 seconds and 4 git commands to generate.