aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mageia.org>2012-02-01 19:16:35 +0000
committerThierry Vignaud <tv@mageia.org>2012-02-01 19:16:35 +0000
commit518697340632e6db3d1b9c95cdf3ca8436a1f53e (patch)
tree870c1d5961e9137725a2b3b4c68dc34d54bb959a
parentf12097ed3075aa50d88a35ac9ce35f682d451556 (diff)
downloadperl-URPM-518697340632e6db3d1b9c95cdf3ca8436a1f53e.tar
perl-URPM-518697340632e6db3d1b9c95cdf3ca8436a1f53e.tar.gz
perl-URPM-518697340632e6db3d1b9c95cdf3ca8436a1f53e.tar.bz2
perl-URPM-518697340632e6db3d1b9c95cdf3ca8436a1f53e.tar.xz
perl-URPM-518697340632e6db3d1b9c95cdf3ca8436a1f53e.zip
(set_nofatal) help perl_checker on callers
-rw-r--r--URPM.pm4
1 files changed, 3 insertions, 1 deletions
diff --git a/URPM.pm b/URPM.pm
index 5187558..6267ac7 100644
--- a/URPM.pm
+++ b/URPM.pm
@@ -26,7 +26,9 @@ sub new {
$self;
}
-sub set_nofatal { $_[0]{nofatal} = $_[1] }
+sub set_nofatal {
+ my ($urpm, $bool) = @_;
+ $urpm->{nofatal} = $bool }
sub packages_providing {
my ($urpm, $name) = @_;