From 3fb10f33d63c9c9c291f457900dbf36ca278a3ff Mon Sep 17 00:00:00 2001 From: Olivier Blin Date: Wed, 1 Mar 2006 13:31:24 +0000 Subject: use network::shorewall::update_interfaces_list() --- perl-install/network/network.pm | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) (limited to 'perl-install') diff --git a/perl-install/network/network.pm b/perl-install/network/network.pm index a5eb3911d..45c5dc2ee 100644 --- a/perl-install/network/network.pm +++ b/perl-install/network/network.pm @@ -613,10 +613,8 @@ sub configure_network { any { $_->{BOOTPROTO} =~ /^(pump|bootp)$/ } values %{$net->{ifcfg}} and $in->do_pkgs->install('pump'); - #- update interfaces list in shorewall require network::shorewall; - my $shorewall = network::shorewall::read(); - $shorewall && !$shorewall->{disabled} and network::shorewall::write($shorewall); + network::shorewall::update_interfaces_list(); $net->{network}{HOSTNAME} && !$::isInstall and sethostname($net); } -- cgit v1.2.1