Fix some inconsistent indenting

This commit is contained in:
Raphaël Hertzog 2020-02-13 15:07:00 +01:00
parent 725add3c19
commit 031fd46b40
1 changed files with 13 additions and 13 deletions

View File

@ -1222,7 +1222,7 @@ sub remove_entry {
my $tmp2 = @{$array}[$i]; my $tmp2 = @{$array}[$i];
my %t2 = %$tmp2; my %t2 = %$tmp2;
if ($t1{"Package"} eq $t2{"Package"}) { if ($t1{"Package"} eq $t2{"Package"}) {
splice(@{$array}, $i, 1); splice(@{$array}, $i, 1);
$i--; $i--;
$entries--; $entries--;
} }
@ -1248,22 +1248,22 @@ sub check_list {
next; next;
} }
if (not accepted($pkgname)) { if (not accepted($pkgname)) {
my $text = $excluded{"$pkgname"}; my $text = $excluded{"$pkgname"};
msg(1," $pkgname has been refused because of $text ...\n"); msg(1," $pkgname has been refused because of $text ...\n");
$ok = 0; $ok = 0;
push @to_remove, $thispkg; push @to_remove, $thispkg;
$reasons = $reasons . " " . $excluded{$pkgname}; $reasons = $reasons . " " . $excluded{$pkgname};
next; next;
} }
if ($check_backports && if ($check_backports &&
($pkgname !~ /\/$codename-backports/) && ($pkgname !~ /\/$codename-backports/) &&
(not accepted("$pkgname/$codename-backports"))) { (not accepted("$pkgname/$codename-backports"))) {
my $text = $excluded{"$pkgname/$codename-backports"}; my $text = $excluded{"$pkgname/$codename-backports"};
msg(1," $pkgname/$codename-backports has been refused because of $text} ...\n"); msg(1," $pkgname/$codename-backports has been refused because of $text} ...\n");
$ok = 0; $ok = 0;
push @to_remove, $thispkg; push @to_remove, $thispkg;
$reasons = $reasons . " " . $excluded{$pkgname}; $reasons = $reasons . " " . $excluded{$pkgname};
next; next;
} }
if ($included{$pkgname}) { if ($included{$pkgname}) {
msg(1, " $pkgname has already been included.\n"); msg(1, " $pkgname has already been included.\n");