use My::Web;
Wrequire 'project::Lib';
+use Carp qw(confess cluck);
sub handler
print(project::Lib->platforms(undef(),"novskip"=>1)) if $W->{"args"}{"platform"};
my %item=project::Lib->name_to_hashref();
+my %item_unused=%item;
# $col{"name"}{"show"}=1
# $col{"name"}{"format"}=sub { "<".$_[0].">"; }
print '<tr>';
for my $col (@col_order) {
next if defined $col{$col}{"show"} && !$col{$col}{"show"};
+ delete $item_unused{$row};
print '<td>';
if (!$col{$col}{"format"}) {
print(($item{$row}{$col} || ""));
&{$print_one_platform}($platform_sym);
}
}
+cluck "INVALID 'platform': $_" for keys(%item_unused);
exit;