From 91ded50a1d58b271e8a5c2020c0951723d2ec418 Mon Sep 17 00:00:00 2001
From: Olivier Blin <oblin@mandriva.org>
Date: Thu, 26 May 2005 10:36:15 +0000
Subject: read_squid_conf() is now in network::squid

---
 perl-install/network/shorewall.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perl-install/network')

diff --git a/perl-install/network/shorewall.pm b/perl-install/network/shorewall.pm
index 49fafb8f3..e6c96e897 100644
--- a/perl-install/network/shorewall.pm
+++ b/perl-install/network/shorewall.pm
@@ -101,7 +101,7 @@ sub write {
     my ($conf) = @_;
     my $default_intf = get_ifcfg_interface();
     my $use_pptp = $default_intf =~ /^ppp/ && cat_("$::prefix/etc/ppp/peers/$default_intf") =~ /pptp/;
-    my $squid_port = network::network::read_squid_conf()->{http_port}[0];
+    my $squid_port = network::squid::read_squid_conf()->{http_port}[0];
 
     my %ports_by_proto;
     foreach (split ' ', $conf->{ports}) {
-- 
cgit v1.2.1