git-svn: fix a regression in dcommit that caused empty log messages
Signed-off-by: Eric Wong <normalperson@yhbt.net>
This commit is contained in:
parent
706587fc6d
commit
780a2f58e7
@ -339,13 +339,14 @@ sub cmd_dcommit {
|
|||||||
if ($_dry_run) {
|
if ($_dry_run) {
|
||||||
print "diff-tree $d~1 $d\n";
|
print "diff-tree $d~1 $d\n";
|
||||||
} else {
|
} else {
|
||||||
|
my $log = get_commit_entry($d)->{log};
|
||||||
my $ra = $gs->ra;
|
my $ra = $gs->ra;
|
||||||
my $pool = SVN::Pool->new;
|
my $pool = SVN::Pool->new;
|
||||||
my %ed_opts = ( r => $last_rev,
|
my %ed_opts = ( r => $last_rev,
|
||||||
ra => $ra->dup,
|
ra => $ra->dup,
|
||||||
svn_path => $ra->{svn_path} );
|
svn_path => $ra->{svn_path} );
|
||||||
my $ed = SVN::Git::Editor->new(\%ed_opts,
|
my $ed = SVN::Git::Editor->new(\%ed_opts,
|
||||||
$ra->get_commit_editor($::_message,
|
$ra->get_commit_editor($log,
|
||||||
sub { print "Committed r$_[0]\n";
|
sub { print "Committed r$_[0]\n";
|
||||||
$last_rev = $_[0]; }),
|
$last_rev = $_[0]; }),
|
||||||
$pool);
|
$pool);
|
||||||
|
Loading…
Reference in New Issue
Block a user