ports/171128: [PATCH] devel/p5-SVN-Web: update to 0.61

Steve Wills swills at FreeBSD.org
Mon Aug 27 23:00:14 UTC 2012


>Number:         171128
>Category:       ports
>Synopsis:       [PATCH] devel/p5-SVN-Web: update to 0.61
>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:   Mon Aug 27 23:00:13 UTC 2012
>Closed-Date:
>Last-Modified:
>Originator:     Steve Wills
>Release:        FreeBSD 10.0-CURRENT amd64
>Organization:
>Environment:
System: FreeBSD meatwad.mouf.net 10.0-CURRENT FreeBSD 10.0-CURRENT #7 r239244M: Mon Aug 13 23:21:42 EDT
>Description:
- Update to 0.61

Port maintainer (rafan at FreeBSD.org) is cc'd.

Generated with FreeBSD Port Tools 0.99_6 (mode: update, diff: SVN)
>How-To-Repeat:
>Fix:

--- p5-SVN-Web-0.61.patch begins here ---
Index: distinfo
===================================================================
--- distinfo	(revision 303264)
+++ distinfo	(working copy)
@@ -1,2 +1,2 @@
-SHA256 (SVN-Web-0.53.tar.gz) = 4844b14f6e76ec644c41230705725aa7d2374fddfe1beb23910eb1b708849549
-SIZE (SVN-Web-0.53.tar.gz) = 85155
+SHA256 (SVN-Web-0.61.tar.gz) = a5d6dbdbd7fe460a1b5413152e5ee976e4154f951476172fc956da0b0c418e2e
+SIZE (SVN-Web-0.61.tar.gz) = 97609
Index: files/patch-Diff.pm
===================================================================
--- files/patch-Diff.pm	(revision 303264)
+++ files/patch-Diff.pm	(working copy)
@@ -1,21 +0,0 @@
---- lib/SVN/Web/Diff.pm	Sun Apr 29 23:22:51 2007
-+++ lib/SVN/Web/Diff.pm	Mon Dec 15 02:30:36 2008
-@@ -188,8 +188,8 @@
- 
-     my $mime = $self->{cgi}->param('mime') || 'text/html';
- 
--    my %types = ( $rev1 => $ra->check_path($path, $rev1),
--		  $rev2 => $ra->check_path($path, $rev2) );
-+    my %types = ( $rev1 => $ra->check_path($self->rpath, $rev1),
-+		  $rev2 => $ra->check_path($self->rpath, $rev2) );
- 
-     SVN::Web::X->throw(error => '(cannot diff nodes of different types: %1 %2 %3)',
- 		       vars  => [$path, $rev1, $rev2])
-@@ -299,7 +299,7 @@
- 
-     my $ra   = $self->{repos}{ra};
- 
--    if($ra->check_path($path, $rev) == $SVN::Node::none) {
-+    if($ra->check_path($self->rpath($path), $rev) == $SVN::Node::none) {
- 	SVN::Web::X->throw(
- 	    error => '(path %1 does not exist in revision %2)',
Index: files/patch-View.pm
===================================================================
--- files/patch-View.pm	(revision 303264)
+++ files/patch-View.pm	(working copy)
@@ -1,11 +0,0 @@
---- lib/SVN/Web/View.pm	Sun Apr 29 23:22:51 2007
-+++ lib/SVN/Web/View.pm	Mon Dec 15 02:29:44 2008
-@@ -134,7 +134,7 @@
-     my $rev = $act_rev;
- 
-     # Get the log for this revision of the file
--    $ra->get_log([$path], $rev, $rev, 1, 1, 1,
-+    $ra->get_log([$self->rpath], $rev, $rev, 1, 1, 1,
-         sub { $self->{REV} = $self->_log(@_) });
- 
-     # Get the text for this revision of the file
Index: files/patch-2basic.t
===================================================================
--- files/patch-2basic.t	(revision 303264)
+++ files/patch-2basic.t	(working copy)
@@ -1,12 +0,0 @@
---- t/2basic.t	Sun Apr 29 23:22:51 2007
-+++ t/2basic.t	Mon Dec 15 03:09:45 2008
-@@ -61,6 +61,9 @@
-     # a ':'.  This catches template bugs with too many slashes.
-     unlike($mech->uri(), qr{(?<!:)//}, 'URI does not contain "//"');
- 
-+    diag('skip static files checks in local tests: '.$mech->uri), return
-+        if $mech->uri->path eq '/' or $mech->uri->path =~ m{/css/};
-+
-     $mech->content_unlike(qr'An error occured', '  and content was correct');
-     if($can_tidy 
-        and ($mech->uri() !~ m{ (?:
Index: files/patch-action.pm
===================================================================
--- files/patch-action.pm	(revision 303264)
+++ files/patch-action.pm	(working copy)
@@ -1,24 +0,0 @@
---- lib/SVN/Web/action.pm	Sun Apr 29 23:22:51 2007
-+++ lib/SVN/Web/action.pm	Mon Dec 15 02:27:15 2008
-@@ -241,7 +241,7 @@
-     my $ra  = $self->{repos}{ra};
- 
-     my @log_result;
--    $ra->get_log([$path], $rev, 1, 1, 0, 1,
-+    $ra->get_log([$self->rpath($path)], $rev, 1, 1, 0, 1,
-                  sub { @log_result = @_; });
- 
-     return @log_result if wantarray();
-@@ -371,5 +371,12 @@
- See L<http://www.perl.com/perl/misc/Artistic.html>
- 
- =cut
-+
-+sub rpath {
-+    my ($self,$p) = @_;
-+    my $path = $p || $self->{path};
-+    $path =~ s{^/}{} if $path;
-+    return $path;
-+}
- 
- 1;
Index: files/patch-Revision.pm
===================================================================
--- files/patch-Revision.pm	(revision 303264)
+++ files/patch-Revision.pm	(working copy)
@@ -1,11 +0,0 @@
---- lib/SVN/Web/Revision.pm	Sun Apr 29 23:22:51 2007
-+++ lib/SVN/Web/Revision.pm	Sun Dec 14 00:25:26 2008
-@@ -211,7 +211,7 @@
-         )
-         if $rev > $yrev;
- 
--    $ra->get_log(['/'], $rev, $rev, 1, 1, 1,
-+    $ra->get_log([''], $rev, $rev, 1, 1, 1,
-         sub { $self->{REV} = $self->_log(@_) });
- 
-     $self->_resolve_changed_paths();
Index: files/patch-Log.pm
===================================================================
--- files/patch-Log.pm	(revision 303264)
+++ files/patch-Log.pm	(working copy)
@@ -1,20 +0,0 @@
---- lib/SVN/Web/Log.pm	Sun Apr 29 23:22:51 2007
-+++ lib/SVN/Web/Log.pm	Mon Dec 15 02:32:02 2008
-@@ -214,7 +215,7 @@
- 	# entries then we're on the last page.
- 	#
- 	# If we're not on the last page then pop off the extra log entry
--	$ra->get_log([$path], $rev, 1, $limit + 1, 1, 1,
-+	$ra->get_log([$self->rpath], $rev, 1, $limit + 1, 1, 1,
- 		     sub { $self->_log(@_) });
- 
- 	$at_oldest = @{ $self->{REVS} } <= $limit;
-@@ -222,7 +223,7 @@
- 	pop @{ $self->{REVS} } unless $at_oldest;
-     } else {
- 	# We must be displaying to the oldest rev, so no paging required
--	$ra->get_log([$path], $rev, 1, $limit, 1, 1,
-+	$ra->get_log([$self->rpath], $rev, 1, $limit, 1, 1,
- 		     sub { $self->_log(@_) });
- 
- 	$at_oldest = 1;
Index: pkg-plist
===================================================================
--- pkg-plist	(revision 303264)
+++ pkg-plist	(working copy)
@@ -1,5 +1,8 @@
 bin/svnweb-install
 bin/svnweb-server
+%%SITE_PERL%%/SVN/CHANGES.pod
+%%SITE_PERL%%/SVN/CONTRIBUTING.pod
+%%SITE_PERL%%/SVN/UPDATING.pod
 %%SITE_PERL%%/SVN/Web.pm
 %%SITE_PERL%%/SVN/Web/Blame.pm
 %%SITE_PERL%%/SVN/Web/Browse.pm
@@ -58,6 +61,7 @@
 %%SITE_PERL%%/SVN/Web/View.pm
 %%SITE_PERL%%/SVN/Web/X.pm
 %%SITE_PERL%%/SVN/Web/action.pm
+%%SITE_PERL%%/%%PERL_ARCH%%/auto/SVN/Web/.packlist
 @dirrm %%SITE_PERL%%/SVN/Web/I18N
 @dirrm %%SITE_PERL%%/SVN/Web/Style/trac
 @dirrm %%SITE_PERL%%/SVN/Web/Style
@@ -65,4 +69,6 @@
 @dirrm %%SITE_PERL%%/SVN/Web/Template/trac
 @dirrm %%SITE_PERL%%/SVN/Web/Template
 @dirrm %%SITE_PERL%%/SVN/Web
+ at dirrm %%SITE_PERL%%/%%PERL_ARCH%%/auto/SVN/Web
+ at dirrm %%SITE_PERL%%/%%PERL_ARCH%%/auto/SVN
 @dirrmtry %%SITE_PERL%%/SVN
Index: Makefile
===================================================================
--- Makefile	(revision 303264)
+++ Makefile	(working copy)
@@ -6,8 +6,7 @@
 #
 
 PORTNAME=	SVN-Web
-PORTVERSION=	0.53
-PORTREVISION=	8
+PORTVERSION=	0.61
 CATEGORIES=	devel perl5
 MASTER_SITES=	CPAN
 PKGNAMEPREFIX=	p5-
@@ -39,12 +38,15 @@
 		p5-Test-HTML-Tidy>=0:${PORTSDIR}/devel/p5-Test-HTML-Tidy \
 		p5-Test-WWW-Mechanize>=0:${PORTSDIR}/devel/p5-Test-WWW-Mechanize
 
-PERL_MODBUILD=	yes
+PERL_CONFIGURE=	yes
 CONFIGURE_ARGS=	--skip_questions
 
 MAN1=		svnweb-install.1 \
 		svnweb-server.1
-MAN3=		SVN::Web.3 \
+MAN3=		SVN::CHANGES.3 \
+		SVN::CONTRIBUTING.3 \
+		SVN::UPDATING.3 \
+		SVN::Web.3 \
 		SVN::Web::Blame.3 \
 		SVN::Web::Browse.3 \
 		SVN::Web::Checkout.3 \
--- p5-SVN-Web-0.61.patch ends here ---

>Release-Note:
>Audit-Trail:
>Unformatted:



More information about the freebsd-ports-bugs mailing list