Eric Wong <e...@80x24.org> writes: > Blindly checking a path component for falsiness is unwise, as > "0" is false to Perl, but a valid pathname component for SVN > (or any filesystem). > > Found via random code reading. > > Signed-off-by: Eric Wong <e...@80x24.org> > --- > Junio: this bugfix should go to "maint". > Will push along with a doc fix for Juergen. > > perl/Git/SVN/Ra.pm | 2 +- > 1 file changed, 1 insertion(+), 1 deletion(-) > > diff --git a/perl/Git/SVN/Ra.pm b/perl/Git/SVN/Ra.pm > index e764696801..56ad9870bc 100644 > --- a/perl/Git/SVN/Ra.pm > +++ b/perl/Git/SVN/Ra.pm > @@ -606,7 +606,7 @@ sub minimize_url { > my $latest = $ra->get_latest_revnum; > $ra->get_log("", $latest, 0, 1, 0, 1, sub {}); > }; > - } while ($@ && ($c = shift @components)); > + } while ($@ && defined($c = shift @components)); > > return canonicalize_url($url); > }
Makes sense to me. Thanks.