portability fix for some perl versions

This commit is contained in:
Dr. Stephen Henson
2011-11-11 19:01:11 +00:00
parent 3b4fb53221
commit 9eca2399f1

View File

@@ -513,29 +513,29 @@ my $mkcmd = "mkdir";
my $cmpall = 0; my $cmpall = 0;
my %fips_enabled = ( my %fips_enabled = (
dsa => 1, "dsa" => 1,
dsa2 => 2, "dsa2" => 2,
"dsa-pqgver" => 2, "dsa-pqgver" => 2,
ecdsa => 2, "ecdsa" => 2,
rsa => 1, "rsa" => 1,
"rsa-pss0" => 2, "rsa-pss0" => 2,
"rsa-pss62" => 1, "rsa-pss62" => 1,
sha => 1, "sha" => 1,
hmac => 1, "hmac" => 1,
cmac => 2, "cmac" => 2,
"rand-aes" => 1, "rand-aes" => 1,
"rand-des2" => 0, "rand-des2" => 0,
aes => 1, "aes" => 1,
"aes-cfb1" => 2, "aes-cfb1" => 2,
des3 => 1, "des3" => 1,
"des3-cfb1" => 2, "des3-cfb1" => 2,
drbg => 2, "drbg" => 2,
"aes-ccm" => 2, "aes-ccm" => 2,
"aes-xts" => 2, "aes-xts" => 2,
"aes-gcm" => 2, "aes-gcm" => 2,
dh => 0, "dh" => 0,
ecdh => 2, "ecdh" => 2,
v2 => 1, "v2" => 1,
); );
foreach (@ARGV) { foreach (@ARGV) {