diff options
| -rw-r--r-- | perl-install/network/shorewall.pm | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/perl-install/network/shorewall.pm b/perl-install/network/shorewall.pm index aeb951d78..2775f2e08 100644 --- a/perl-install/network/shorewall.pm +++ b/perl-install/network/shorewall.pm @@ -141,7 +141,12 @@ sub write { set_config_file('masq', if_($conf->{masq_subnet}, [ $conf->{net_interface}, $conf->{masq_subnet} ])); require services; - services::set_status('shorewall', !$conf->{disabled}, $::isInstall); + if ($conf->{disabled}) { + services::disable('shorewall', $::isInstall); + run_program::rooted($::prefix, '/sbin/shorewall', 'clear') unless $::isInstall; + } else { + services::enable('shorewall', $::isInstall); + } } 1; |