git-svn: don't output git commits in quiet mode

Ideally only errors should be output in this mode so fetch
can be run from cron and normally produce no output. Without
this change it would output a single line on each git commit,
e.g.
r1909 = 32ef87860662526d4a62f903949ed21e0341079e (u2_10_12_branch)

Signed-off-by: Simon Arlott <simon@fire.lp0.eu>
Acked-by: Eric Wong <normalperson@yhbt.net>

diff --git a/git-svn.perl b/git-svn.perl
index f21cfb462d3d6d84a4c47bca3d5882ee20266ff7..e5c3dfe5d2c9d11c6225da725d86f343912f5782 100755 (executable)
--- a/git-svn.perl
+++ b/git-svn.perl
@@ -2331,13 +2331,13 @@ sub do_git_commit {
 
        $self->{last_rev} = $log_entry->{revision};
        $self->{last_commit} = $commit;
 
        $self->{last_rev} = $log_entry->{revision};
        $self->{last_commit} = $commit;

-       print "r$log_entry->{revision}";
+       print "r$log_entry->{revision}" unless $::_q;

        if (defined $log_entry->{svm_revision}) {
        if (defined $log_entry->{svm_revision}) {

-                print " (\@$log_entry->{svm_revision})";
+                print " (\@$log_entry->{svm_revision})" unless $::_q;

                 $self->rev_map_set($log_entry->{svm_revision}, $commit,
                                   0, $self->svm_uuid);
        }
                 $self->rev_map_set($log_entry->{svm_revision}, $commit,
                                   0, $self->svm_uuid);
        }

-       print " = $commit ($self->{ref_id})\n";
+       print " = $commit ($self->{ref_id})\n" unless $::_q;

        if (--$_gc_nr == 0) {
                $_gc_nr = $_gc_period;
                gc();
        if (--$_gc_nr == 0) {
                $_gc_nr = $_gc_period;
                gc();