cvsimport: Missing tests for verbosity flag.

This commit is contained in:
Matthias Urlichs 2005-07-03 19:03:30 +02:00
Родитель 34155390a5
Коммит 9da07f3493
1 изменённых файлов: 2 добавлений и 2 удалений

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

@ -602,7 +602,7 @@ while(<CVS>) {
$branch = $opt_o if $branch eq "HEAD";
if(defined $branch_date{$branch} and $branch_date{$branch} >= $date) {
# skip
print "skip patchset $patchset: $date before $branch_date{$branch}\n";
print "skip patchset $patchset: $date before $branch_date{$branch}\n" if $opt_v;
$state = 11;
next;
}
@ -649,7 +649,7 @@ while(<CVS>) {
my $rev = $3;
$fn =~ s#^/+##;
my $data = $cvs->file($fn,$rev);
print "".($init ? "New" : "Update")." $fn: ".length($data)." bytes.\n";
print "".($init ? "New" : "Update")." $fn: ".length($data)." bytes.\n" if $opt_v;
mkpath(dirname($fn),$opt_v);
open(F,"> ./$fn")
or die "Cannot create '$fn': $!\n";