summaryrefslogtreecommitdiffstats
path: root/perl-install/network/shorewall.pm
diff options
context:
space:
mode:
authorOlivier Blin <oblin@mandriva.org>2006-03-01 13:31:06 +0000
committerOlivier Blin <oblin@mandriva.org>2006-03-01 13:31:06 +0000
commit277abd754b4024a765293406434728f8ff26bc51 (patch)
tree86adf36c15716f5dff9af8fc25ada000f2c09048 /perl-install/network/shorewall.pm
parent592c25f9e924ef8aeb7b41abd334e099954eb536 (diff)
downloaddrakx-277abd754b4024a765293406434728f8ff26bc51.tar
drakx-277abd754b4024a765293406434728f8ff26bc51.tar.gz
drakx-277abd754b4024a765293406434728f8ff26bc51.tar.bz2
drakx-277abd754b4024a765293406434728f8ff26bc51.tar.xz
drakx-277abd754b4024a765293406434728f8ff26bc51.zip
add update_interfaces_list
Diffstat (limited to 'perl-install/network/shorewall.pm')
-rw-r--r--perl-install/network/shorewall.pm6
1 files changed, 5 insertions, 1 deletions
diff --git a/perl-install/network/shorewall.pm b/perl-install/network/shorewall.pm
index 3f54729b8..e3bb9edb8 100644
--- a/perl-install/network/shorewall.pm
+++ b/perl-install/network/shorewall.pm
@@ -157,5 +157,9 @@ sub write {
}
}
-1;
+sub update_interfaces_list() {
+ my $shorewall = network::shorewall::read();
+ $shorewall && !$shorewall->{disabled} and network::shorewall::write($shorewall);
+}
+1;