summaryrefslogtreecommitdiff
path: root/git-svn.perl
diff options
context:
space:
mode:
authorLibravatar Eric Wong <normalperson@yhbt.net>2007-02-09 12:23:47 -0800
committerLibravatar Eric Wong <normalperson@yhbt.net>2007-02-23 00:57:12 -0800
commit9e3cdbd4f2e02bf63bfaa8f6e2747601f117cf2d (patch)
treebf1c7bd5b58d4c4eff672b2807e1e38a4819dd22 /git-svn.perl
parentgit-svn: fix buggy regular expression usage in several places (diff)
downloadtgif-9e3cdbd4f2e02bf63bfaa8f6e2747601f117cf2d.tar.xz
git-svn: correctly handle the -q flag in SVN::Git::Fetcher
Signed-off-by: Eric Wong <normalperson@yhbt.net>
Diffstat (limited to 'git-svn.perl')
-rwxr-xr-xgit-svn.perl8
1 files changed, 4 insertions, 4 deletions
diff --git a/git-svn.perl b/git-svn.perl
index 7664b385f6..ed363e972d 100755
--- a/git-svn.perl
+++ b/git-svn.perl
@@ -1770,14 +1770,14 @@ sub delete_entry {
while (<$ls>) {
chomp;
$self->{gii}->remove($_);
- print "\tD\t$_\n" unless $self->{q};
+ print "\tD\t$_\n" unless $::_q;
}
- print "\tD\t$gpath/\n" unless $self->{q};
+ print "\tD\t$gpath/\n" unless $::_q;
command_close_pipe($ls, $ctx);
$self->{empty}->{$path} = 0
} else {
$self->{gii}->remove($gpath);
- print "\tD\t$gpath\n" unless $self->{q};
+ print "\tD\t$gpath\n" unless $::_q;
}
undef;
}
@@ -1913,7 +1913,7 @@ sub close_file {
}
$fb->{pool}->clear;
$self->{gii}->update($fb->{mode_b}, $hash, $path) or croak $!;
- print "\t$fb->{action}\t$path\n" if $fb->{action} && ! $self->{q};
+ print "\t$fb->{action}\t$path\n" if $fb->{action} && ! $::_q;
undef;
}