From 73c851144720e28b21a491b6250385170db9d752 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Thu, 24 Apr 2003 19:00:12 +0000
Subject: perl_checker adaptations + fixes

---
 perl-install/network/shorewall.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'perl-install/network/shorewall.pm')

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");
-- 
cgit v1.2.1