diff options
| author | Thierry Vignaud <tv@mageia.org> | 2011-09-20 18:39:59 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tv@mageia.org> | 2011-09-20 18:39:59 +0000 |
| commit | 80028325730760ee817b75eb3b5c2c67aaa089b3 (patch) | |
| tree | 83583b369de40b6f41d558bbe813d9070f8998ce /URPM/Signature.pm | |
| parent | 90eee80969aa54b3bc610338e0c9449e5dfef51f (diff) | |
| download | perl-URPM-80028325730760ee817b75eb3b5c2c67aaa089b3.tar perl-URPM-80028325730760ee817b75eb3b5c2c67aaa089b3.tar.gz perl-URPM-80028325730760ee817b75eb3b5c2c67aaa089b3.tar.bz2 perl-URPM-80028325730760ee817b75eb3b5c2c67aaa089b3.tar.xz perl-URPM-80028325730760ee817b75eb3b5c2c67aaa089b3.zip | |
perl_checker cleanups
Diffstat (limited to 'URPM/Signature.pm')
| -rw-r--r-- | URPM/Signature.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/URPM/Signature.pm b/URPM/Signature.pm index 003af07..44cd2ef 100644 --- a/URPM/Signature.pm +++ b/URPM/Signature.pm @@ -30,7 +30,7 @@ sub parse_pubkeys_ { my $found_blank = 0; foreach (split "\n", $p->description) { if ($block) { - if (/^$/ and not $found_blank) { + if (/^$/ && !$found_blank) { # All content until now were the encapsulated pem # headers... $content = ''; @@ -58,7 +58,7 @@ sub parse_pubkeys_ { } #- obsoleted -sub import_needed_pubkeys { +sub import_needed_pubkeys() { warn "import_needed_pubkeys prototype has changed, please give a file directly\n"; return; } @@ -85,7 +85,7 @@ sub import_needed_pubkeys_from_file { #- let the caller know about what has been found. #- this is an error if the key is not found. - $o_callback and $o_callback->($kv?$kv->{id}:undef, $imported); + $o_callback and $o_callback->($kv ? $kv->{id} : undef, $imported); } 1; |