git-svn: correctly handle the -q flag in SVN::Git::Fetcher

Signed-off-by: Eric Wong <normalperson@yhbt.net>
This commit is contained in:
Eric Wong 2007-02-09 12:23:47 -08:00
Родитель 4e9f6cc78e
Коммит 9e3cdbd4f2
1 изменённых файлов: 4 добавлений и 4 удалений

Просмотреть файл

@ -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;
}