diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2001-12-04 14:49:45 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-12-04 14:49:45 +0000 |
| commit | cd556f37bb9f2fa5aff9923b66ab4b3214d847a0 (patch) | |
| tree | 35076e82eaba89c5b90a358d2ba213afa58fce28 /lib/Net/t | |
| parent | b429a72e21c23c9f086d1c98fa5499cd4403a815 (diff) | |
| download | perl-cd556f37bb9f2fa5aff9923b66ab4b3214d847a0.tar.gz | |
Must wipe out the memory of real Socket before starting
to use the new fake one.
p4raw-id: //depot/perl@13461
Diffstat (limited to 'lib/Net/t')
| -rw-r--r-- | lib/Net/t/config.t | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lib/Net/t/config.t b/lib/Net/t/config.t index 41136ed8bb..08df82b1ee 100644 --- a/lib/Net/t/config.t +++ b/lib/Net/t/config.t @@ -8,6 +8,8 @@ BEGIN { if (!eval "require Socket") { print "1..0 # no Socket\n"; exit 0; } + undef *{Socket::inet_aton}; + undef *{Socket::inet_ntoa}; if (ord('A') == 193 && !eval "require Convert::EBCDIC") { print "1..0 # EBCDIC but no Convert::EBCDIC\n"; exit 0; } |