From 932b873787f546efa2629bc903988b40b04fb919 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Wed, 12 Nov 2003 12:31:23 +0000 Subject: fix bogus use of old netwok module instead of network::network --- perl-install/http.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'perl-install/http.pm') diff --git a/perl-install/http.pm b/perl-install/http.pm index 4e19eed8b..f1c812b62 100644 --- a/perl-install/http.pm +++ b/perl-install/http.pm @@ -1,7 +1,7 @@ package http; # $Id$ use IO::Socket; -use network; +use network::network; my $sock; @@ -14,7 +14,7 @@ sub getFile { $url =~ m|/XXX$| and return; #- force closing connection. my ($host, $port, $path) = $url =~ m,^http://([^/:]+)(?::(\d+))?(/\S*)?$,; - $host = network::resolv($host); + $host = resolv($host); $sock = IO::Socket::INET->new(PeerAddr => $host, PeerPort => $port || 80, -- cgit v1.2.1