Author: geissert Date: 2010-07-28 20:29:35 +0000 (Wed, 28 Jul 2010) New Revision: 15047 Modified: bin/embedded-cleanup Log: etch should be ignored, also warn about removed/itp entries when the package *does* exist Modified: bin/embedded-cleanup ==================================================================--- bin/embedded-cleanup 2010-07-28 19:19:37 UTC (rev 15046) +++ bin/embedded-cleanup 2010-07-28 20:29:35 UTC (rev 15047) @@ -65,6 +65,7 @@ my @oldstables = qw( woody sarge + etch ); my %pkgs; @@ -145,6 +146,12 @@ $reported = 1; } + if (exists($pkgs{$embedding_package}{''sid''}) && !$reported + && ($status eq ''removed'' || $status eq ''itp'')) { + push @errors, "Package ''$embedding_package'' does exist, line:$."; + $reported = 1; + } + if ($release) { unless ($reported || exists ($pkgs{$embedding_package}{$release}) || grep {$_ eq $release} @oldstables) {