diff options
author | Thierry Vignaud <tv@mageia.org> | 2012-12-04 06:09:34 +0000 |
---|---|---|
committer | Thierry Vignaud <tv@mageia.org> | 2012-12-04 06:09:34 +0000 |
commit | ac7b1a6ef0815de9b4cd4eda3d10ecb7f9c36098 (patch) | |
tree | 0c17cd0ddcddda1816f6c02cf7fd6e45ffd27b99 | |
parent | 676bb3df229ee4452a29c484830bbc366f7dbb81 (diff) | |
download | perl-URPM-ac7b1a6ef0815de9b4cd4eda3d10ecb7f9c36098.tar perl-URPM-ac7b1a6ef0815de9b4cd4eda3d10ecb7f9c36098.tar.gz perl-URPM-ac7b1a6ef0815de9b4cd4eda3d10ecb7f9c36098.tar.bz2 perl-URPM-ac7b1a6ef0815de9b4cd4eda3d10ecb7f9c36098.tar.xz perl-URPM-ac7b1a6ef0815de9b4cd4eda3d10ecb7f9c36098.zip |
(get_installed_arch) silent a warning (mga#8287)
-rw-r--r-- | URPM/Resolve.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/URPM/Resolve.pm b/URPM/Resolve.pm index c5aa514..09fffc5 100644 --- a/URPM/Resolve.pm +++ b/URPM/Resolve.pm @@ -99,7 +99,7 @@ sub find_candidate_packages { sub get_installed_arch { my ($db, $n) = @_; my $arch; - $db->traverse_tag_find('name', $n, sub { $arch = $_[0]->arch }); + $db->traverse_tag_find('name', $n, sub { $arch = $_[0]->arch; 1 }); $arch; } |