diff options
Diffstat (limited to 'devel/p5-SVN-Web/files/patch-Diff.pm')
-rw-r--r-- | devel/p5-SVN-Web/files/patch-Diff.pm | 21 |
1 files changed, 7 insertions, 14 deletions
diff --git a/devel/p5-SVN-Web/files/patch-Diff.pm b/devel/p5-SVN-Web/files/patch-Diff.pm index 04294bbbed5e..61c32898da50 100644 --- a/devel/p5-SVN-Web/files/patch-Diff.pm +++ b/devel/p5-SVN-Web/files/patch-Diff.pm @@ -1,28 +1,21 @@ ---- lib/SVN/Web/Diff.pm.orig 2007-04-30 03:22:51.000000000 +0800 -+++ lib/SVN/Web/Diff.pm 2009-04-21 18:06:59.000000000 +0800 -@@ -188,8 +188,11 @@ +--- 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 $path_getlog = $path; -+ if ($path_getlog eq "/") {$path_getlog = "";} -+ $path_getlog =~ s/^\///; -+ my %types = ( $rev1 => $ra->check_path($path_getlog, $rev1), -+ $rev2 => $ra->check_path($path_getlog, $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 +302,10 @@ +@@ -299,7 +299,7 @@ my $ra = $self->{repos}{ra}; - if($ra->check_path($path, $rev) == $SVN::Node::none) { -+ my $path_getlog = $path; -+ if ($path_getlog eq "/") {$path_getlog = "";} -+ $path_getlog =~ s/^\///; -+ if($ra->check_path($path_getlog, $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)', - vars => [$path, $rev], |