%# This is your fortune.
<& /Edit/Elements/SortedList,
    %ARGS,
    Data  => [
	[ '18%', loc('Project Name'),		sub { $_[0]->Name }, '', 30 ],
	[ '22%', loc('Public Description'),	sub { $_[0]->OriginObj->CustomFieldValue('PublicDescription') }, '', 18 ],
	(map {
	    my $field = $_;
	    [ (($field =~ /Maturity|Platform/) ? '7%' : '10%'), loc($field), sub { join(',', map loc($_), sort map { $_->Content } @{$_[0]->OriginObj->CustomFieldValues(join('', split(/ /, $field)))->ItemsArrayRef}) }, '', (($field eq 'Intended Audience') ? 8 : 15) ]
	} @fields),
	[  '6%', loc('Download #'),		sub { $_[0]->Attribute('Download') || '' }, 'align=right', '', sub { $_[0] <=> $_[1] } ],
	[ '10%', loc('Registration Date'),	sub { $_[0]->OriginObj->CreatedObj->AsDate } ],
	[ '15%', loc('Admin'),			sub { join(',', map $_->Name, @{$_[0]->AdminCc->UserMembersObj->ItemsArrayRef} ) }, '', 25 ],
    ],
    Link    => sub {
	"/Foundry/Project/index.html?Queue=" . $_[0]->Id
    },
    Size    => 14,
    Class   => 'tableFixed',
&>
<%INIT>
my @fields = grep {
    $_ ne $ARGS->{Type}
} ('Maturity', 'Platform', 'License', 'Programming Language', 'Intended Audience');
</%INIT>
<%ARGS>
$Begin	=> 0
$ARGS	=> {}
</%ARGS>
