From 807c6eb53f3d7b7822d60a701aef50c7ea366d03 Mon Sep 17 00:00:00 2001
From: "Chris D. Faulhaber" <jedgar@FreeBSD.org>
Date: Tue, 27 Nov 2001 14:34:05 +0000
Subject: Update port to 0.71 Update ipv6 patch

PR:		28378 (ipv6 fix)
---
 irc/p5-IRC/Makefile                  |  6 ++----
 irc/p5-IRC/distinfo                  |  2 +-
 irc/p5-IRC/files/patch-Connection.pm | 22 +++++++++++-----------
 3 files changed, 14 insertions(+), 16 deletions(-)

(limited to 'irc/p5-IRC')

diff --git a/irc/p5-IRC/Makefile b/irc/p5-IRC/Makefile
index ca635d583fcd..c9ad8ec5c5de 100644
--- a/irc/p5-IRC/Makefile
+++ b/irc/p5-IRC/Makefile
@@ -6,8 +6,7 @@
 #
 
 PORTNAME=	Net-IRC
-PORTVERSION=	0.70
-PORTREVISION=	1
+PORTVERSION=	0.71
 CATEGORIES=	irc perl5
 MASTER_SITES=	${MASTER_SITE_PERL_CPAN}
 MASTER_SITE_SUBDIR=	Net
@@ -18,8 +17,7 @@ MAINTAINER=	jedgar@fxp.org
 PERL_CONFIGURE=	yes
 
 MANPREFIX=	${PREFIX}/lib/perl5/${PERL_VERSION}
-MAN3=		\
-		Net::Connection.3 \
+MAN3=		Net::Connection.3 \
 		Net::DCC.3 \
 		Net::Event.3 \
 		Net::IRC.3
diff --git a/irc/p5-IRC/distinfo b/irc/p5-IRC/distinfo
index 80be3a69c1ac..a2466fdc2454 100644
--- a/irc/p5-IRC/distinfo
+++ b/irc/p5-IRC/distinfo
@@ -1 +1 @@
-MD5 (Net-IRC-0.70.tar.gz) = 27ee8e5990c6c98a89941c6880de7225
+MD5 (Net-IRC-0.71.tar.gz) = a826fb30864b619d6de47c97cef4fc24
diff --git a/irc/p5-IRC/files/patch-Connection.pm b/irc/p5-IRC/files/patch-Connection.pm
index 8fcabb849ef4..6834703e4c56 100644
--- a/irc/p5-IRC/files/patch-Connection.pm
+++ b/irc/p5-IRC/files/patch-Connection.pm
@@ -1,11 +1,11 @@
---- Connection.pm.orig	Tue May 30 07:12:02 2000
-+++ Connection.pm	Wed Jun 13 17:01:06 2001
-@@ -1101,7 +1101,7 @@
- 		 /x)                      # That ought to do it for now...
- 	{
- 	    $line = substr $line, 1 if $line =~ /^:/;
--	    ($from, $line) = split ":", $line, 2;
-+	    ($from, $line) = $line =~ m/^(.*):(.*?)$/;
- 	    ($from, $type, @stuff) = split /\s+/, $from;
- 	    $type = lc $type;
- 	    
+--- Connection.pm.orig	Sun Jul  1 14:50:50 2001
++++ Connection.pm	Tue Nov 27 09:31:39 2001
+@@ -1112,7 +1112,7 @@
+ 		 /x)                      # That ought to do it for now...
+ 	{
+ 	    $line = substr $line, 1 if $line =~ /^:/;
+-	    ($from, $line) = split ":", $line, 2;
++	    ($from, $line) = $line =~ m/^(\S+\s.*?):(.*)$/;
+ 	    ($from, $type, @stuff) = split /\s+/, $from;
+ 	    $type = lc $type;
+ 	    
-- 
cgit v1.2.3