summaryrefslogtreecommitdiffstats
path: root/lib/network/drakfirewall.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/network/drakfirewall.pm')
-rw-r--r--lib/network/drakfirewall.pm6
1 files changed, 6 insertions, 0 deletions
diff --git a/lib/network/drakfirewall.pm b/lib/network/drakfirewall.pm
index 4b334a0..d6a1191 100644
--- a/lib/network/drakfirewall.pm
+++ b/lib/network/drakfirewall.pm
@@ -6,6 +6,7 @@ use diagnostics;
use network::shorewall;
use common;
use network::nfs;
+use network::network;
my @all_servers =
(
@@ -127,6 +128,10 @@ my @ifw_rules = (
},
);
+# global network configuration
+my $net = {};
+network::network::read_net_conf($net);
+
sub port2server {
my ($port) = @_;
find {
@@ -260,6 +265,7 @@ You can also give a range of ports (eg: 24300:24350/udp)", $invalid_port));
} },
[
{ label => N("Which services would you like to allow the Internet to connect to?"), title => 1 },
+ if_($net->{PROFILE}, { label => N("Those settings will be saved for the network profile <b>%s</b>", $net->{PROFILE}) }),
{ text => N("Everything (no firewall)"), val => \$disabled, type => 'bool' },
(map { { text => translate($_->{name}), val => \$_->{on}, type => 'bool', disabled => sub { $disabled } } } @l),
{ label => N("Other ports"), val => \$unlisted, advanced => 1, disabled => sub { $disabled } },