diff options
| author | Eric Wong <normalperson@yhbt.net> | 2007-01-18 18:15:23 -0800 |
|---|---|---|
| committer | Eric Wong <normalperson@yhbt.net> | 2007-02-23 00:57:09 -0800 |
| commit | 780a2f58e727386ae81223d7a5c16fbc55cfd9fa (patch) | |
| tree | abbb35125807e0fc852ccdf66970e609568df55f /git-svn.perl | |
| parent | 706587fc6d56db1ba6c7207d4c0c456bac6f77c2 (diff) | |
| download | git-780a2f58e727386ae81223d7a5c16fbc55cfd9fa.tar.gz git-780a2f58e727386ae81223d7a5c16fbc55cfd9fa.tar.xz | |
git-svn: fix a regression in dcommit that caused empty log messages
Signed-off-by: Eric Wong <normalperson@yhbt.net>
Diffstat (limited to 'git-svn.perl')
| -rwxr-xr-x | git-svn.perl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/git-svn.perl b/git-svn.perl index 9d50d305c..b5a4cb05a 100755 --- a/git-svn.perl +++ b/git-svn.perl @@ -339,13 +339,14 @@ sub cmd_dcommit { if ($_dry_run) { print "diff-tree $d~1 $d\n"; } else { + my $log = get_commit_entry($d)->{log}; my $ra = $gs->ra; my $pool = SVN::Pool->new; my %ed_opts = ( r => $last_rev, ra => $ra->dup, svn_path => $ra->{svn_path} ); my $ed = SVN::Git::Editor->new(\%ed_opts, - $ra->get_commit_editor($::_message, + $ra->get_commit_editor($log, sub { print "Committed r$_[0]\n"; $last_rev = $_[0]; }), $pool); |