Added link to sources of the ports.

This commit is contained in:
Wolfram Schneider 1998-10-27 18:12:39 +00:00
parent 39b2caa675
commit edb7eb5607
Notes: svn2git 2020-12-08 03:00:23 +00:00
svn path=/www/; revision=3694

View file

@ -29,6 +29,10 @@ $packagesURL = "$ftpserver/pub/FreeBSD/packages-stable/All/"
# support tar on the fly or gzip'ed tar on the fly
$ftparchive = 'tar' if !$ftparchive;
# ports download sources script
$pds = 'http://www.freebsd.org/cgi/pds.cgi';
# better layout and link to the sources
if ($urlcgi) {
$baseHTTP = $urlcgi . '?' . $baseHTTP;
@ -107,6 +111,9 @@ sub main {
$catkey{$name} = $cat[0];
local($sourcepath) = $loc;
$sourcepath =~ s%/usr/%%;
foreach $i (@cat) {
$stats{$i}++;
@ -124,6 +131,8 @@ sub main {
$data{$i} .= qq{ | <a href="$packagesURL$name.tgz">Package</a>};
}
$data{$i} .= qq{ | <A HREF="$pds?$sourcepath">Sources</A>};
$ownerurl = $owner;
$ownerurl =~ s/&lt;/</g;
$owenrurl =~ s/&gt;/>/g;