diff options
| author | Eric Wong <normalperson@yhbt.net> | 2006-11-25 17:38:41 -0800 |
|---|---|---|
| committer | Junio C Hamano <junkio@cox.net> | 2006-11-25 19:59:32 -0800 |
| commit | efe4631def181d32f932672a7ea31e52ee0ab308 (patch) | |
| tree | 63f488f52243f8163f2908e44e1c4d4c6492d5fa /git-svn.perl | |
| parent | f64d7fd267c501f501e18a888e3e1e0c5b56458f (diff) | |
| download | git-efe4631def181d32f932672a7ea31e52ee0ab308.tar.gz | |
git-svn: allow SVN:: lib users to track the root of the repository (again)
I broke this again in 747fa12cef73b6ca04fffaddaad7326cf546cdea.
Thanks to merlyn for pointing this out to me on IRC.
Signed-off-by: Eric Wong <normalperson@yhbt.net>
Signed-off-by: Junio C Hamano <junkio@cox.net>
Diffstat (limited to 'git-svn.perl')
| -rwxr-xr-x | git-svn.perl | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/git-svn.perl b/git-svn.perl index 0a47b1f9fd..de4e74a60d 100755 --- a/git-svn.perl +++ b/git-svn.perl @@ -2919,8 +2919,12 @@ sub libsvn_fetch { my $p = $SVN->{svn_path}; foreach my $f (keys %$paths) { my $m = $paths->{$f}->action(); - $f =~ s#^/\Q$p\E/##; - next if $f =~ m#^/#; + if (length $p) { + $f =~ s#^/\Q$p\E/##; + next if $f =~ m#^/#; + } else { + $f =~ s#^/##; + } if ($m =~ /^[DR]$/) { print "\t$m\t$f\n" unless $_q; process_rm($gui, $last_commit, $f); |