Merge the changes in the English version (1.34 -> 1.40).

This commit is contained in:
Jun Kuriyama 2001-05-21 14:47:09 +00:00
parent 7573608727
commit 7c9d3b090a
Notes: svn2git 2020-12-08 03:00:23 +00:00
svn path=/www/; revision=9479

View file

@ -4,9 +4,9 @@
#
# by John Fieber <jfieber@freebsd.org>
# Mon May 13 10:31:58 EST 1996
# $FreeBSD: www/ja/ports/portindex,v 1.22 2001/01/01 18:41:42 hrs Exp $
# $FreeBSD: www/ja/ports/portindex,v 1.23 2001/01/02 02:22:50 kuriyama Exp $
# The FreeBSD Japanese Documentation Project
# Original revision: 1.34
# Original revision: 1.40
############################################################
@ -21,15 +21,17 @@ do $config if -f $config;
if ($ENV{'MASTER_FTP_SERVER'}) {
$ftpserver = $ENV{'MASTER_FTP_SERVER'};
} else {
$ftpserver = 'ftp://ftp.freebsd.org' if !$ftpserver;
$ftpserver = 'ftp://ftp5.freebsd.org' if !$ftpserver;
}
$base = "$ftpserver/pub/FreeBSD/branches/-current" if !$base;
$base = "" if !$base;
$baseHTTP = $base if !$baseHTTP;
$baseFTP = "$ftpserver/pub/FreeBSD/branches/-current/";
$urlcgi = 'http://www.freebsd.org/cgi/url.cgi' if !$urlcgi;
$packagesURL = "$ftpserver/pub/FreeBSD/ports/i386/packages-stable/All/"
if !$packagesURL;
# support tar on the fly or gzip'ed tar on the fly
$ftparchive = 'tar' if !$ftparchive;
$ftparchive = '';
$ftparchive = 'tar' if !defined $ftparchive;
# ports download sources script
$pds = 'http://www.freebsd.org/cgi/pds.cgi';
@ -42,7 +44,7 @@ if ($urlcgi) {
$today = &getdate;
&packages_exist('packages.exists', *packages);
&category_description(($ARGV[2] || '.') . '/categories', *category_description);
&category_description(($ARGV[1] || '.') . '/categories', *category_description);
&main;
sub getdate {
@ -164,8 +166,8 @@ sub main {
$stats{$i}++;
# figure out the FTP url
$loc =~ s/\/usr/$base/;
$ldesc =~ s/\/usr/$baseHTTP/;
$loc =~ s/\/usr\//$baseFTP/;
$ldesc =~ s/\/usr\//$baseHTTP/;
# The name description and maintainer
$data{$i} .= "<DT><B><A NAME=\"$name\"></A><A HREF=\"$loc.$ftparchive\">$name</A></B> ";
@ -237,7 +239,7 @@ sub main {
&header(MOUTF, "FreeBSD Ports");
# print MOUTF "<!--#include virtual=\"./ports.inc\" -->\n";
print MOUTF "&blurb;";
print MOUTF "<hr><P>FreeBSD Ports Collection には, 現時点で $portnumber 個の ports が提供されています. <br> <A HREF=\"$base/ports.tar.gz\">全ての $portnumber 個の ports を tar でまとめて gzip したもの</A> (およそ 10 メガバイト) をダウンロードするか, 以下の分類からたどってください:\n";
print MOUTF "<hr><P>FreeBSD Ports Collection には, 現時点で $portnumber 個の ports が提供されています. <br> <A HREF=\"$baseFTP/ports.tar.gz\">全ての $portnumber 個の ports を tar でまとめて gzip したもの</A> (およそ 10 メガバイト) をダウンロードするか, 以下の分類からたどってください:\n";
print MOUTF "<UL>\n";