svn commit: r45343 - head/en_US.ISO8859-1/htdocs/ports
Gavin Atkinson
gavin at FreeBSD.org
Sun Jul 20 16:17:27 UTC 2014
Author: gavin
Date: Sun Jul 20 16:17:26 2014
New Revision: 45343
URL: http://svnweb.freebsd.org/changeset/doc/45343
Log:
pds.cgi and url.cgi no longer exist after r45331, stop linking to it.
Whilst here, catch up with other style changes from ports.cgi made
over the last year.
Modified:
head/en_US.ISO8859-1/htdocs/ports/portindex
Modified: head/en_US.ISO8859-1/htdocs/ports/portindex
==============================================================================
--- head/en_US.ISO8859-1/htdocs/ports/portindex Sun Jul 20 16:03:16 2014 (r45342)
+++ head/en_US.ISO8859-1/htdocs/ports/portindex Sun Jul 20 16:17:26 2014 (r45343)
@@ -35,25 +35,14 @@ if ($ENV{'MASTER_FTP_SERVER'}) {
} else {
$ftpserver = 'ftp://ftp.FreeBSD.org' if !$ftpserver;
}
-$baseHTTP = $base if !$baseHTTP;
my $baseFTP = "$ftpserver/pub/FreeBSD/ports/ports";
-my $baseCVSWEB = 'http://www.FreeBSD.org/cgi/cvsweb.cgi/';
-$urlcgi = 'http://www.FreeBSD.org/cgi/url.cgi' if !$urlcgi;
+my $baseSVNWEB = 'https://svnweb.FreeBSD.org/ports/head/';
$packagesURL = "$ftpserver/pub/FreeBSD/ports/i386/packages-stable/All/"
if !$packagesURL;
# support tar on the fly or gzip'ed tar on the fly
my $ftparchive = '';
$ftparchive = 'tar' if !defined $ftparchive;
-
-# ports download sources script
-my $pds = 'http://www.FreeBSD.org/cgi/pds.cgi';
-
-# better layout and link to the sources
-if ($urlcgi) {
- $baseHTTP = $urlcgi . '?' . $baseHTTP;
-}
-
my %packages = ();
my %category_description = ();
my @category_groups = ();
@@ -202,15 +191,13 @@ sub main {
$catkey{$name} = $cat[0];
- my $sourcepath = $loc;
- $sourcepath =~ s%/usr/%%;
-
foreach my $i (sort(@cat)) {
$stats{$i}++;
# figure out the FTP url
- $loc =~ s/\/usr\//$baseCVSWEB/;
- $ldesc =~ s/\/usr\//$baseHTTP/;
+ $loc =~ s%/usr/ports/%$baseSVNWEB%;
+ $ldesc =~ s%/usr/ports/%$baseSVNWEB%;
+ $ldesc .= '?revision=HEAD';
# The name description and maintainer
$name =~ s/,.*//g;
@@ -225,7 +212,7 @@ sub main {
$data{$i} .= qq{ | <a href="$packagesURL$name.tgz">Package</a>};
}
- $data{$i} .= qq{ | <a href="$pds?$sourcepath">Sources</a>};
+ $data{$i} .= qq{ | <a href="$loc/?view=log">Changes</a>};
if ($www ne "") {
$data{$i} .= qq{ | <a href="$www">Main Web Site</a>};
More information about the svn-doc-all
mailing list