aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mandriva.org>2007-02-20 14:18:13 +0000
committerThierry Vignaud <tv@mandriva.org>2007-02-20 14:18:13 +0000
commit6741cc739968a4b401ae09ffcc0ea72893777916 (patch)
tree3ec46d7e4a852e4a5a22b7b8d77b216907214f07
parentf8882e663bcc1dcd99ab8ffee9a7034cac644338 (diff)
downloadrpmdrake-6741cc739968a4b401ae09ffcc0ea72893777916.tar
rpmdrake-6741cc739968a4b401ae09ffcc0ea72893777916.tar.gz
rpmdrake-6741cc739968a4b401ae09ffcc0ea72893777916.tar.bz2
rpmdrake-6741cc739968a4b401ae09ffcc0ea72893777916.tar.xz
rpmdrake-6741cc739968a4b401ae09ffcc0ea72893777916.zip
perl_checker cleanups
-rwxr-xr-xpark-rpmdrake4
1 files changed, 2 insertions, 2 deletions
diff --git a/park-rpmdrake b/park-rpmdrake
index 587e2d70..6cc66b35 100755
--- a/park-rpmdrake
+++ b/park-rpmdrake
@@ -150,7 +150,7 @@ sub populated_networks_to_raw_hosts {
@{$group->{networks}} = grep {
my @l = grep { $_->{selected} } $_->{mask_class} ? @{$_->{hosts}} : $_;
push @hosts, @l;
- $_->{mask_class} && @l
+ $_->{mask_class} && @l;
} @{$group->{networks}};
$group->{raw_hosts} = [ map { host_to_raw_host($_) } @hosts ];
@@ -394,7 +394,7 @@ sub group_modify {
my $s = $tree_model->get($_[0], 1);
my $host = find { $s eq $_->{ip} } @{$network->{hosts}};
$host->{selected} = $tree_model->get($_[0], 0);
- })
+ });
});
};