summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorEugeni Dodonov <eugeni@mandriva.org>2009-08-17 14:34:42 +0000
committerEugeni Dodonov <eugeni@mandriva.org>2009-08-17 14:34:42 +0000
commit6637448e6d3d4e50558dd8ecbd47b7abe66f29fc (patch)
treea8d659c20bd6bdb31a611cbfd6016947b49ab44f
parente55164d1fc013a89367c9f11d1e3cd8300b57297 (diff)
downloaddrakx-net-6637448e6d3d4e50558dd8ecbd47b7abe66f29fc.tar
drakx-net-6637448e6d3d4e50558dd8ecbd47b7abe66f29fc.tar.gz
drakx-net-6637448e6d3d4e50558dd8ecbd47b7abe66f29fc.tar.bz2
drakx-net-6637448e6d3d4e50558dd8ecbd47b7abe66f29fc.tar.xz
drakx-net-6637448e6d3d4e50558dd8ecbd47b7abe66f29fc.zip
Showing current profile in firewall configuration.
-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 } },