|
|
|
@ -68,6 +68,7 @@ my ($_stdin, $_help, $_edit,
@@ -68,6 +68,7 @@ my ($_stdin, $_help, $_edit,
|
|
|
|
|
$_prefix, $_no_checkout, $_url, $_verbose, |
|
|
|
|
$_git_format, $_commit_url, $_tag); |
|
|
|
|
$Git::SVN::_follow_parent = 1; |
|
|
|
|
$_q ||= 0; |
|
|
|
|
my %remote_opts = ( 'username=s' => \$Git::SVN::Prompt::_username, |
|
|
|
|
'config-dir=s' => \$Git::SVN::Ra::config_dir, |
|
|
|
|
'no-auth-cache' => \$Git::SVN::Prompt::_no_auth_cache, |
|
|
|
@ -80,7 +81,7 @@ my %fc_opts = ( 'follow-parent|follow!' => \$Git::SVN::_follow_parent,
@@ -80,7 +81,7 @@ my %fc_opts = ( 'follow-parent|follow!' => \$Git::SVN::_follow_parent,
|
|
|
|
|
'useSvnsyncProps' => \$Git::SVN::_use_svnsync_props, |
|
|
|
|
'log-window-size=i' => \$Git::SVN::Ra::_log_window_size, |
|
|
|
|
'no-checkout' => \$_no_checkout, |
|
|
|
|
'quiet|q' => \$_q, |
|
|
|
|
'quiet|q+' => \$_q, |
|
|
|
|
'repack-flags|repack-args|repack-opts=s' => |
|
|
|
|
\$Git::SVN::_repack_flags, |
|
|
|
|
'use-log-author' => \$Git::SVN::_use_log_author, |
|
|
|
@ -2331,13 +2332,13 @@ sub do_git_commit {
@@ -2331,13 +2332,13 @@ sub do_git_commit {
|
|
|
|
|
|
|
|
|
|
$self->{last_rev} = $log_entry->{revision}; |
|
|
|
|
$self->{last_commit} = $commit; |
|
|
|
|
print "r$log_entry->{revision}" unless $::_q; |
|
|
|
|
print "r$log_entry->{revision}" unless $::_q > 1; |
|
|
|
|
if (defined $log_entry->{svm_revision}) { |
|
|
|
|
print " (\@$log_entry->{svm_revision})" unless $::_q; |
|
|
|
|
print " (\@$log_entry->{svm_revision})" unless $::_q > 1; |
|
|
|
|
$self->rev_map_set($log_entry->{svm_revision}, $commit, |
|
|
|
|
0, $self->svm_uuid); |
|
|
|
|
} |
|
|
|
|
print " = $commit ($self->{ref_id})\n" unless $::_q; |
|
|
|
|
print " = $commit ($self->{ref_id})\n" unless $::_q > 1; |
|
|
|
|
if (--$_gc_nr == 0) { |
|
|
|
|
$_gc_nr = $_gc_period; |
|
|
|
|
gc(); |
|
|
|
|