Trim leading / off of paths in git-svn prop_walk
[git/git.git] / git-svn.perl
index 3308fe1..d5316eb 100755 (executable)
@@ -1858,6 +1858,7 @@ sub rel_path {
 sub prop_walk {
        my ($self, $path, $rev, $sub) = @_;
 
+       $path =~ s#^/##;
        my ($dirent, undef, $props) = $self->ra->get_dir($path, $rev);
        $path =~ s#^/*#/#g;
        my $p = $path;