diff options
| author |  Eric Wong <normalperson@yhbt.net> | 2007-01-28 04:02:01 -0800 |
|---|---|---|
| committer | Eric Wong <normalperson@yhbt.net> | 2007-02-23 00:57:10 -0800 |
| commit | 2fa6a23efb200cea814add88ce1d1d193ba83860 (patch) | |
| tree | 72eee44a1d19614618b73fcc105d30c893f58944 | |
| parent | git-svn: allow multi-fetch to fetch things chronologically (diff) | |
| download | tgif-2fa6a23efb200cea814add88ce1d1d193ba83860.tar.xz | |
git-svn: correctly track diff-less copies with do_switch
Also, this should allow for the tracking of new, but empty
directories where we would want to see the log message.
Signed-off-by: Eric Wong <normalperson@yhbt.net>
| -rwxr-xr-x | git-svn.perl | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/git-svn.perl b/git-svn.perl index 5d398ee65f..36e5c57adf 100755 --- a/git-svn.perl +++ b/git-svn.perl @@ -1167,6 +1167,7 @@ sub find_parent_branch { 1, $ed) or die "SVN connection failed somewhere...\n"; } + $ed->{new_fetch} = 1; return $self->make_log_entry($rev, [$parent], $ed); } not_found: @@ -1202,6 +1203,7 @@ sub do_fetch { return $log_entry; } $ed = SVN::Git::Fetcher->new($self); + $ed->{new_fetch} = 1; } unless ($self->ra->gs_do_update($last_rev, $rev, $self->{path}, 1, $ed)) { @@ -1275,7 +1277,7 @@ sub make_log_entry { my ($self, $rev, $parents, $ed) = @_; my $untracked = $self->get_untracked($ed); - return undef if ($ed->{nr} == 0 && scalar @$untracked == 0); + return undef if (! $ed->{new_fetch} && ! $ed->{nr} && ! @$untracked); open my $un, '>>', "$self->{dir}/unhandled.log" or croak $!; print $un "r$rev\n" or croak $!; |