Date: Sun, 16 May 2004 18:53:31 -0700 From: Lars Eggert <lars.eggert@gmx.net> To: FreeBSD-gnats-submit@FreeBSD.org Cc: tobez@FreeBSD.org Subject: ports/66714: [PATCH] www/p5-WWW-Mechanize: update to 1.02 Message-ID: <20040516165826.83551F674@ftp.ccrle.nec.de> Resent-Message-ID: <200405161700.i4GH0fLO029257@freefall.freebsd.org>
next in thread | raw e-mail | index | archive | help
>Number: 66714
>Category: ports
>Synopsis: [PATCH] www/p5-WWW-Mechanize: update to 1.02
>Confidential: no
>Severity: non-critical
>Priority: low
>Responsible: freebsd-ports-bugs
>State: open
>Quarter:
>Keywords:
>Date-Required:
>Class: update
>Submitter-Id: current-users
>Arrival-Date: Sun May 16 10:00:41 PDT 2004
>Closed-Date:
>Last-Modified:
>Originator: Lars Eggert
>Release: FreeBSD 5.2-CURRENT i386
>Organization:
>Environment:
System: FreeBSD localhost 5.2-CURRENT FreeBSD 5.2-CURRENT #0: Tue May 4 21:57:44 PDT
>Description:
- Update to 1.02
Port maintainer (tobez@FreeBSD.org) is cc'd.
Generated with FreeBSD Port Tools 0.50
>How-To-Repeat:
>Fix:
--- p5-WWW-Mechanize-1.02.patch begins here ---
? p5-WWW-Mechanize-1.02.tbz
? work
Index: Makefile
===================================================================
RCS file: /home/ncvs/ports/www/p5-WWW-Mechanize/Makefile,v
retrieving revision 1.7
diff -u -u -r1.7 Makefile
--- Makefile 15 Feb 2004 15:25:37 -0000 1.7
+++ Makefile 16 May 2004 16:53:20 -0000
@@ -6,7 +6,7 @@
#
PORTNAME= WWW-Mechanize
-PORTVERSION= 0.72
+PORTVERSION= 1.02
CATEGORIES= www perl5
MASTER_SITES= ${MASTER_SITE_PERL_CPAN}
MASTER_SITE_SUBDIR= WWW
@@ -24,8 +24,10 @@
PERL_CONFIGURE= yes
-MAN3= WWW::Mechanize.3 WWW::Mechanize::Examples.3 \
- WWW::Mechanize::FAQ.3 WWW::Mechanize::Link.3
+MAN1PREFIX= ${PREFIX}
+MAN3= WWW::Mechanize.3 WWW::Mechanize::Cookbook.3 \
+ WWW::Mechanize::Examples.3 WWW::Mechanize::FAQ.3 \
+ WWW::Mechanize::Link.3
MAN1= mech-dump.1
.include <bsd.port.pre.mk>
Index: distinfo
===================================================================
RCS file: /home/ncvs/ports/www/p5-WWW-Mechanize/distinfo,v
retrieving revision 1.7
diff -u -u -r1.7 distinfo
--- distinfo 15 Feb 2004 15:25:37 -0000 1.7
+++ distinfo 16 May 2004 16:53:20 -0000
@@ -1,2 +1,2 @@
-MD5 (WWW-Mechanize-0.72.tar.gz) = c53a8dd33de1c01bc08078096c72bf29
-SIZE (WWW-Mechanize-0.72.tar.gz) = 82958
+MD5 (WWW-Mechanize-1.02.tar.gz) = 81dba4c03fe003ce3f715e6432bdb1aa
+SIZE (WWW-Mechanize-1.02.tar.gz) = 86219
Index: pkg-plist
===================================================================
RCS file: /home/ncvs/ports/www/p5-WWW-Mechanize/pkg-plist,v
retrieving revision 1.6
diff -u -u -r1.6 pkg-plist
--- pkg-plist 7 Oct 2003 13:05:42 -0000 1.6
+++ pkg-plist 16 May 2004 16:53:20 -0000
@@ -1,10 +1,9 @@
bin/mech-dump
%%SITE_PERL%%/WWW/Mechanize.pm
+%%SITE_PERL%%/WWW/Mechanize/Cookbook.pod
%%SITE_PERL%%/WWW/Mechanize/Examples.pod
%%SITE_PERL%%/WWW/Mechanize/FAQ.pod
%%SITE_PERL%%/WWW/Mechanize/Link.pm
%%SITE_PERL%%/%%PERL_ARCH%%/auto/WWW/Mechanize/.packlist
@dirrm %%SITE_PERL%%/%%PERL_ARCH%%/auto/WWW/Mechanize
-@unexec rmdir %D/%%SITE_PERL%%/%%PERL_ARCH%%/auto/WWW 2>/dev/null || true
@dirrm %%SITE_PERL%%/WWW/Mechanize
-@unexec rmdir %D/%%SITE_PERL%%/WWW 2>/dev/null || true
Index: files/patch-Makefile.PL
===================================================================
RCS file: /home/ncvs/ports/www/p5-WWW-Mechanize/files/patch-Makefile.PL,v
retrieving revision 1.2
diff -u -u -r1.2 patch-Makefile.PL
--- files/patch-Makefile.PL 3 Oct 2003 10:29:21 -0000 1.2
+++ files/patch-Makefile.PL 16 May 2004 16:53:20 -0000
@@ -1,56 +1,11 @@
---- Makefile.PL.orig Mon Aug 18 03:35:42 2003
-+++ Makefile.PL Fri Oct 3 11:47:30 2003
-@@ -5,28 +5,7 @@
- use constant FLAG_SKIPMECHDUMP => "t/SKIP-MECH-FORMS";
-
- # Much logic stolen fromm libwww-perl's Makefile.PL
--my $skiplive = 0;
--
--require IO::Socket;
--my $s = IO::Socket::INET->new(PeerAddr => "www.google.com:80",
-- Timeout => 10,
-- );
--if ($s) {
-- close($s);
-- $skiplive = 0;
--} else {
-- print <<EOT;
--
--It seems that you are not directly connected to the Internet. Some
--of the WWW::Mechanize tests interact with websites such as Google,
--in addition to its own internal tests.
--
--EOT
--
-- if ( prompt("Do you want to skip these tests?", "y") =~ /^y/i ) {
-- $skiplive = 1;
-- }
--} # failed connect
-+my $skiplive = 1;
-
- my $tests = 't/*.t';
- $tests .= ' t/live/*.t' unless $skiplive;
-@@ -53,17 +32,17 @@
- 'test' => { TESTS => $tests },
+--- m Sun May 16 18:31:01 2004
++++ Makefile.PL Sun May 16 18:32:35 2004
+@@ -63,7 +63,7 @@
+ clean => { FILES => join( " ", FLAG_SKIPMECHDUMP, 'WWW-Mechanize-0*' ) },
};
-if ( prompt( "Do you want to install the mech-dump utility?", "y" ) =~ /^y/i ) {
-+#if ( prompt( "Do you want to install the mech-dump utility?", "y" ) =~ /^y/i ) {
- $parms->{EXE_FILES} = [ 'script/mech-dump' ];
++if (1 or prompt( "Do you want to install the mech-dump utility?", "y" ) =~ /^y/i ) {
+ $parms->{EXE_FILES} = [ 'bin/mech-dump' ];
$parms->{PREREQ_PM}->{'Getopt::Long'} = 0;
$parms->{PREREQ_PM}->{'Pod::Usage'} = 0;
-
-- local @ARGV = FLAG_SKIPMECHDUMP;
-+ local @ARGV = (@ARGV, FLAG_SKIPMECHDUMP);
- rm_f();
--} else {
-- local @ARGV = FLAG_SKIPMECHDUMP;
-- touch();
--}
-+#} else {
-+# local @ARGV = FLAG_SKIPMECHDUMP;
-+# touch();
-+#}
-
-
- eval { require IO::Socket::SSL };
--- p5-WWW-Mechanize-1.02.patch ends here ---
>Release-Note:
>Audit-Trail:
>Unformatted:
Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?20040516165826.83551F674>