diff options
author | Daniel Kahn Gillmor <dkg@fifthhorseman.net> | 2009-02-03 21:37:29 -0500 |
---|---|---|
committer | Daniel Kahn Gillmor <dkg@fifthhorseman.net> | 2009-02-03 21:37:29 -0500 |
commit | c18ef1a9a630826e642f33a7077b382cc5a7a25c (patch) | |
tree | 756e1f99372929f8dacfa1f8d5ec74785b11fe70 /src/keytrans/pem2openpgp | |
parent | 17b89ec0f5ff0fce733f60b6973e8fc372d7c037 (diff) |
still trying to get clean perl for pem2openpgp
Diffstat (limited to 'src/keytrans/pem2openpgp')
-rwxr-xr-x | src/keytrans/pem2openpgp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/keytrans/pem2openpgp b/src/keytrans/pem2openpgp index 61ce00f..8ef6257 100755 --- a/src/keytrans/pem2openpgp +++ b/src/keytrans/pem2openpgp @@ -364,7 +364,7 @@ if (! defined $ENV{PEM2OPENPGP_USAGE_FLAGS}) { $flags = $usage_flags->{authenticate}; } else { my @ff = split(",", $ENV{PEM2OPENPGP_USAGE_FLAGS}); - foreach $f (@ff) { + foreach my $f (@ff) { if (! defined $usage_flags->{$f}) die "No such flag $f"; $flags |= $usage_flags->{$f}; |