diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2003-04-24 19:00:12 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2003-04-24 19:00:12 +0000 |
commit | 73c851144720e28b21a491b6250385170db9d752 (patch) | |
tree | dcc9fae4302b3d083ad7cc7a808e5d17f970bb8c /perl-install/network/shorewall.pm | |
parent | 0dc3338257439d2265c1eb13c3a66c9431c88cb5 (diff) | |
download | drakx-73c851144720e28b21a491b6250385170db9d752.tar drakx-73c851144720e28b21a491b6250385170db9d752.tar.gz drakx-73c851144720e28b21a491b6250385170db9d752.tar.bz2 drakx-73c851144720e28b21a491b6250385170db9d752.tar.xz drakx-73c851144720e28b21a491b6250385170db9d752.zip |
perl_checker adaptations + fixes
Diffstat (limited to 'perl-install/network/shorewall.pm')
-rw-r--r-- | perl-install/network/shorewall.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/network/shorewall.pm b/perl-install/network/shorewall.pm index 083c90ae3..b41bb636a 100644 --- a/perl-install/network/shorewall.pm +++ b/perl-install/network/shorewall.pm @@ -46,7 +46,7 @@ sub get_config_file { map { [ split ' ' ] } grep { !/^#/ } cat_("$::prefix/etc/shorewall/$file"); } -sub default_interfaces { +sub default_interfaces() { my %conf; my @l = detect_devices::getNet() or return; @@ -59,7 +59,7 @@ sub default_interfaces { \%conf; } -sub read { +sub read() { my %conf; $conf{disabled} = !glob_("$::prefix/etc/rc3.d/S*shorewall"); |