From 63a6ba234e18b398b880c9cda083aef06fbf03de Mon Sep 17 00:00:00 2001 From: Olivier Blin Date: Tue, 4 Mar 2008 23:15:04 +0000 Subject: remove last spaces --- lib/network/drakfirewall.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'lib') diff --git a/lib/network/drakfirewall.pm b/lib/network/drakfirewall.pm index 6b8bbf3..659606a 100644 --- a/lib/network/drakfirewall.pm +++ b/lib/network/drakfirewall.pm @@ -120,8 +120,8 @@ sub default_from_pkgs { my @pkgs = $do_pkgs->are_installed(map { split ' ', $_->{pkg} } @all_servers); [ grep { my $s = $_; - exists $s->{force_default_selection} ? - $s->{force_default_selection} : + exists $s->{force_default_selection} ? + $s->{force_default_selection} : any { member($_, @pkgs) } split(' ', $s->{pkg}); } @all_servers ]; } -- cgit v1.2.1