diff options
author | Olivier Blin <oblin@mandriva.org> | 2005-05-26 10:35:21 +0000 |
---|---|---|
committer | Olivier Blin <oblin@mandriva.org> | 2005-05-26 10:35:21 +0000 |
commit | c602ef6cd0264ba656d9248acf9b40dd57382b61 (patch) | |
tree | c1133b5d40d50515c2621a15f1d389c68febc716 /perl-install/network | |
parent | 547c513f327ce7ce2477a535c4ba844c436de43e (diff) | |
download | drakx-c602ef6cd0264ba656d9248acf9b40dd57382b61.tar drakx-c602ef6cd0264ba656d9248acf9b40dd57382b61.tar.gz drakx-c602ef6cd0264ba656d9248acf9b40dd57382b61.tar.bz2 drakx-c602ef6cd0264ba656d9248acf9b40dd57382b61.tar.xz drakx-c602ef6cd0264ba656d9248acf9b40dd57382b61.zip |
simplify check_iptables()
Diffstat (limited to 'perl-install/network')
-rw-r--r-- | perl-install/network/shorewall.pm | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/perl-install/network/shorewall.pm b/perl-install/network/shorewall.pm index 82d3c5ec0..49fafb8f3 100644 --- a/perl-install/network/shorewall.pm +++ b/perl-install/network/shorewall.pm @@ -13,10 +13,8 @@ use log; sub check_iptables { - my ($in) = @_; - - my $existing_config = -f "$::prefix/etc/sysconfig/iptables"; - $existing_config ||= $::isStandalone && do { + -f "$::prefix/etc/sysconfig/iptables" || + $::isStandalone && do { system('modprobe iptable_nat'); -x '/sbin/iptables' && listlength(`/sbin/iptables -t nat -nL`) > 8; }; |