From 53dd9d0ce060feb0ecfb98414e53b90aaab984be Mon Sep 17 00:00:00 2001
From: Olivier Blin <oblin@mandriva.org>
Date: Thu, 8 Sep 2005 13:13:00 +0000
Subject: only enable built-in IFW rules for now (too late to add strings for
 custom rules)

---
 perl-install/network/drakfirewall.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/perl-install/network/drakfirewall.pm b/perl-install/network/drakfirewall.pm
index 0c42644ba..c5235cc0c 100644
--- a/perl-install/network/drakfirewall.pm
+++ b/perl-install/network/drakfirewall.pm
@@ -244,7 +244,7 @@ sub choose_watched_services {
 
     my @l = (@ifw_rules, @$servers, map { { ports => $_ } } split(' ', $unlisted));
     my $enabled = 1;
-    $_->{ifw} = 1 foreach @l;
+    $_->{ifw} = 1 foreach @ifw_rules;
 
     $in->ask_from_({
         messages =>
-- 
cgit v1.2.1