print(project::Lib->platforms(undef(),"novskip"=>1));
my %item=project::Lib->name_to_hashref();
+my %item_unused=%item;
my @platforms=@project::Lib::platforms;
while (@platforms) {
(lc($item{$a}{"name"}) cmp lc($item{$b}{"name"}));
} map({ $item{$_}{"platform"} ne $platform_sym ? () : ($_); } keys(%item));
for my $project (@projects) {
+ delete $item_unused{$project};
my $t="";
$t.="<h3>".a_href("/project/$project/",$item{$project}{"name"}.": ".$item{$project}{"summary"})."</h3>\n";
}
}
}
+cluck "INVALID 'platform': $_" for keys(%item_unused);
exit;