diff --git a/git-archimport.perl b/git-archimport.perl
index 00808500165068247826895c063aebce8e9901f7..aab4e38440ef0d9d757f3df09406901a9693a356 100755 (executable)
--- a/git-archimport.perl
+++ b/git-archimport.perl
#
if (ptag($ps->{id})) {
$opt_v && print " * Skipping already imported: $ps->{id}\n";
- return 0;
+ next;
}
print " * Starting to work on $ps->{id}\n";
print " + commit $commitid\n";
$opt_v && print " + commit date is $ps->{date} \n";
$opt_v && print " + parents: ",join(' ',@par),"\n";
- if (my $dirty = `git-diff-files`) {
- die "22 Unclean tree when about to process $ps->{id} " .
- " - did we fail to commit cleanly before?\n$dirty";
- }
}
if ($opt_v) {