Code

archimport: Fix a bug I introduced in the new log parser
authorEric Wong <normalperson@yhbt.net>
Thu, 24 Nov 2005 07:56:31 +0000 (23:56 -0800)
committerMartin Langhoff <martin@catalyst.net.nz>
Sun, 11 Dec 2005 01:41:40 +0000 (14:41 +1300)
This fixes the case (that worked originally in Martin's version)
where the only new/modified files are Arch control files.

Signed-off-by: Eric Wong <normalperson@yhbt.net>
Signed-off-by: Martin Langhoff <martin@catalyst.net.nz>
git-archimport.perl

index 1cf126181ba008ab11d9fb23afccb8623cb00b48..00808500165068247826895c063aebce8e9901f7 100755 (executable)
@@ -790,7 +790,7 @@ sub parselog {
     # skip Arch control files, unescape pika-escaped files
     foreach my $k (keys %want_headers) {
         next unless (defined $ps->{$k});
-        my @tmp;
+        my @tmp = ();
         foreach my $t (@{$ps->{$k}}) {
            next unless length ($t);
            next if $t =~ m!\{arch\}/!;
@@ -804,7 +804,7 @@ sub parselog {
            }
            push @tmp, $t;
         }
-        $ps->{$k} = \@tmp if scalar @tmp;
+        $ps->{$k} = \@tmp;
     }
 }