From a7c62940b05f5fc75406ad8e0c61b335d50b8f01 Mon Sep 17 00:00:00 2001
From: Jun Kuriyama <kuriyama@FreeBSD.org>
Date: Thu, 6 May 2004 00:30:56 +0000
Subject: Unbreak on perl-5.8.x.

---
 ftp/ftpmirror/files/patch-TCP.pm | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'ftp/ftpmirror/files/patch-TCP.pm')

diff --git a/ftp/ftpmirror/files/patch-TCP.pm b/ftp/ftpmirror/files/patch-TCP.pm
index 35eb097270da..d8ed2c572d39 100644
--- a/ftp/ftpmirror/files/patch-TCP.pm
+++ b/ftp/ftpmirror/files/patch-TCP.pm
@@ -16,9 +16,9 @@ diff -u -r1.1.1.1 -r1.12
  
  use Carp;
  use Socket;
-+BEGIN {
-+    eval 'use Socket6' unless (eval '&AF_INET6');       # IPv6 patched Perl
-+}
++
++use Socket6;
++
  use AutoLoader 'AUTOLOAD';
  
  $VERSION = '0.03';
-- 
cgit v1.2.3