Fix error statistics
authorAlexander Wirt <formorer@grml.org>
Sat, 5 May 2007 21:28:05 +0000 (23:28 +0200)
committerAlexander Wirt <formorer@grml.org>
Sat, 5 May 2007 21:28:05 +0000 (23:28 +0200)
source-report/get_sources

index d819152..b105399 100755 (executable)
@@ -223,7 +223,7 @@ my $pnum = keys(%{$package_tree});
 my %s_hash; 
 my $errors = 0;
 foreach my $package (keys(%{$package_tree})) {
-       $errors++ if $package_tree->{$package}->{'status'} eq "ERROR"; 
+       $errors++ if $package_tree->{$package}->{'status'} ne "OK"; 
        if (! exists  $s_hash{ $package_tree->{$package}->{'source'} }) {
                $s_hash{$package_tree->{$package}->{'source'}} = 1; 
        }