diff options
| author | Thierry Vignaud <tvignaud@mandriva.org> | 2003-11-12 12:31:23 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tvignaud@mandriva.org> | 2003-11-12 12:31:23 +0000 |
| commit | 932b873787f546efa2629bc903988b40b04fb919 (patch) | |
| tree | 1d3c42f85cdaeeef96e4c507fa09a8f1da804a55 /perl-install/http.pm | |
| parent | 7639d230b844648b4d4b6d2ed00830c42a46b1e4 (diff) | |
| download | drakx-932b873787f546efa2629bc903988b40b04fb919.tar drakx-932b873787f546efa2629bc903988b40b04fb919.tar.gz drakx-932b873787f546efa2629bc903988b40b04fb919.tar.bz2 drakx-932b873787f546efa2629bc903988b40b04fb919.tar.xz drakx-932b873787f546efa2629bc903988b40b04fb919.zip | |
fix bogus use of old netwok module instead of network::network
Diffstat (limited to 'perl-install/http.pm')
| -rw-r--r-- | perl-install/http.pm | 4 |
1 files changed, 2 insertions, 2 deletions
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, |