(lc($item{$a}{"name"}) cmp lc($item{$b}{"name"}));
} map({ $item{$_}{"platform"} ne $platform_sym ? () : ($_); } keys(%item));
for my $project (@projects) {
+ if ($item{$project}{"icon"}) {
+ print <<"HERE";
+<table border="0" width="100%">
+ <col width="1*" />
+ <col width="0*" />
+ <tr>
+ <td align="left">
+HERE
+ }
print "<h3>".a_href("/project/$project/",$item{$project}{"name"}.": ".$item{$project}{"summary"})."</h3>\n";
print "<blockquote>\n";
print $item{$project}{"description"};
print "</blockquote>\n";
+ if ($item{$project}{"icon"}) {
+ print <<"HERE";
+ </td>
+ <td align="right">@{[
+ a_href("/project/$project/",img("/project/$project/".$item{$project}{"icon"},$item{$project}{"name"}." Icon"))
+ ]}</td>
+ </tr>
+</table>
+HERE
+ }
}
}
"license"=>"GPL",
"maintenance"=>"active",
"language"=>"i386 asm, C, Perl",
+ "icon"=>"captive-install-acquire-icon",
"cvs-of main tree"=>"priv/captive",
"cvs-of branched ".a_href('http://www.reactos.com/','reactos')." subdir"=>"priv/reactos:captive",
"cvs-of branched ".a_href('http://lufs.sourceforge.net/lufs/','lufs')=>"lufs:captive",