diff options
-rwxr-xr-x | checkem | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -53,7 +53,7 @@ if ( exists $ENV{CHECKEM_ALG} ) { # Try worse and worse algorithms until we get a digest object else { ALG: for my $alg (qw(SHA-256 SHA-1 MD5)) { - next ALG if not eval { $dig = Digest->new($alg); }; + last ALG if eval { $dig = Digest->new($alg); }; } } |