diff options
author | Thierry Vignaud <tv@mageia.org> | 2012-03-20 19:52:28 +0000 |
---|---|---|
committer | Thierry Vignaud <tv@mageia.org> | 2012-03-20 19:52:28 +0000 |
commit | edd0ffaff6022cb6ce29bd6a6e76c1d1518725b7 (patch) | |
tree | 0561fbc4134730750ac2d377b6f1a5d278c7f082 /Rpmdrake | |
parent | a7ec2ac258e7fefd647e9e975d4c8d793ae02d3d (diff) | |
download | rpmdrake-edd0ffaff6022cb6ce29bd6a6e76c1d1518725b7.tar rpmdrake-edd0ffaff6022cb6ce29bd6a6e76c1d1518725b7.tar.gz rpmdrake-edd0ffaff6022cb6ce29bd6a6e76c1d1518725b7.tar.bz2 rpmdrake-edd0ffaff6022cb6ce29bd6a6e76c1d1518725b7.tar.xz rpmdrake-edd0ffaff6022cb6ce29bd6a6e76c1d1518725b7.zip |
perl_checker cleanups
Diffstat (limited to 'Rpmdrake')
-rw-r--r-- | Rpmdrake/gui.pm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/Rpmdrake/gui.pm b/Rpmdrake/gui.pm index 6a4dc745..4962a586 100644 --- a/Rpmdrake/gui.pm +++ b/Rpmdrake/gui.pm @@ -401,7 +401,7 @@ my ($common, $w, %wtree, %ptree, %pix); sub set_node_state { my ($iter, $state, $model) = @_; - ($state eq 'XXX' || !$state) and return; + return if $state eq 'XXX' || !$state; $pix{$state} ||= gtkcreate_pixbuf('state_' . $state); $model->set($iter, $pkg_columns{state_icon} => $pix{$state}); $model->set($iter, $pkg_columns{state} => $state); @@ -638,7 +638,7 @@ sub pkgs_provider { ); my %tmp_filter_methods = ( all => sub { - [ difference2([ keys %$pkgs ], $h->{inactive_backports}) ] + [ difference2([ keys %$pkgs ], $h->{inactive_backports}) ]; }, all_updates => sub { # potential "updates" from media not tagged as updates: @@ -651,10 +651,10 @@ sub pkgs_provider { }, backports => sub { $h->{backports} }, meta_pkgs => sub { - [ difference2($h->{meta_pkgs}, $h->{inactive_backports}) ] + [ difference2($h->{meta_pkgs}, $h->{inactive_backports}) ]; }, gui_pkgs => sub { - [ difference2($h->{gui_pkgs}, $h->{inactive_backports}) ] + [ difference2($h->{gui_pkgs}, $h->{inactive_backports}) ]; }, ); foreach my $importance (qw(bugfix security normal)) { |