my @dist=(
{
- "name"=>"Debian GNU/Linux<br />'unstable' i386",
- "id"=>"debian",
- "out"=>sub {
- my($pkg,$version_base,$version_ext)=@_;
- $version_ext=~s/^\d+//;
- my $file="${pkg}_$version_base".($version_ext=~/^\d+$/ ? "" : $version_ext)."_i386.deb";
- my $r=&$a_href_arch("dist/$file",$file);
- (my $filedev=$file)=~s/^\Q$pkg\E_/${pkg}-dev_/;
- $r.="<br />".&$a_href_arch("dist/$filedev",$filedev) if $has_devel{$pkg};
- return $r;
- },
- },
- {
"name"=>"Sources (.tar.gz)",
"id"=>"source",
"out"=>sub {
<td>@{[ a_href 'dist/captive-static-'.$version{"captive"}[0].'.tar.gz',undef(),"size"=>1,"basename"=>1 ]}</td>
</tr>
<tr>
- <td>Debian .deb binaries</td>
- <td>@{[ a_href 'CVS.html.pl#debian','download link' ]}</td>
- </tr>
- <tr>
<td>Source archives</td>
<td>@{[ a_href 'CVS.html.pl#source','download link' ]}</td>
</tr>