diff --git a/ru/ports/portindex b/ru/ports/portindex
index 5540a9e67b..660588ac90 100755
--- a/ru/ports/portindex
+++ b/ru/ports/portindex
@@ -5,10 +5,10 @@
 # by John Fieber <jfieber@freebsd.org>
 # Mon May 13 10:31:58 EST 1996
 
-# $FreeBSD: www/ru/ports/portindex,v 1.4 2002/02/17 13:57:30 phantom Exp $
+# $FreeBSD$
 # The FreeBSD Russian Documentation Project
-# $FreeBSDru: frdp/www/ru/ports/portindex,v 1.7 2001/12/26 09:52:40 phantom Exp $
-# Original revision: 1.42
+# $FreeBSDru: frdp/www/ru/ports/portindex,v 1.12 2003/12/13 09:28:29 andy Exp $
+# Original revision: 1.48
 
 ############################################################
 
@@ -27,7 +27,8 @@ if ($ENV{'MASTER_FTP_SERVER'}) {
 }
 $base = "" if !$base;
 $baseHTTP = $base if !$baseHTTP;
-$baseFTP = "$ftpserver/pub/FreeBSD/branches/-current";
+$baseFTP = "$ftpserver/pub/FreeBSD/ports/ports";
+$baseCVSWEB = 'http://www.FreeBSD.org/cgi/cvsweb.cgi/';
 $urlcgi = 'http://www.freebsd.org/cgi/url.cgi' if !$urlcgi;
 $packagesURL = "$ftpserver/pub/FreeBSD/ports/i386/packages-stable/All/"
     if !$packagesURL;
@@ -166,7 +167,7 @@ sub main {
 	    $stats{$i}++;
 
     	    # figure out the FTP url
-	    $loc =~ s/\/usr/$baseFTP/;
+	    $loc =~ s/\/usr\//$baseCVSWEB/;
 	    $ldesc =~ s/\/usr/$baseHTTP/;
 
     	    # The name description and maintainer
@@ -174,8 +175,10 @@ sub main {
      
 
 	    $data{$i} .= "<DD>$desc<BR><A HREF=\"$ldesc\">Полное описание</A>";
-	    if ($packages{"$name.tgz"}) { 
-		$data{$i} .= qq{ | <a href="$packagesURL$name.tgz">Пакадж</a>};
+	    if ($packages{"$name.tbz"}) { 
+		$data{$i} .= qq{ | <a href="$packagesURL$name.tbz">Пакет</a>};
+	    } elsif ($packages{"$name.tgz"}) { 
+		$data{$i} .= qq{ | <a href="$packagesURL$name.tgz">Пакет</a>};
 	    }
 
 	    $data{$i} .= qq{ | <A HREF="$pds?$sourcepath">Исходные тексты</A>};
@@ -237,13 +240,13 @@ sub main {
 
     open(MOUTF, ">index.sgml");
 
-    &header(MOUTF, "FreeBSD Ports");
+    &header(MOUTF, "Порты FreeBSD");
 #    print MOUTF "<!--#include virtual=\"./ports.inc\" -->\n";
     print MOUTF "&blurb;";
     print MOUTF "<hr><P>В списке Коллекции Портов FreeBSD на данный момент
-присутствуют $portnumber портированых в FreeBSD программ.<br>
-<A HREF=\"$baseFTP/ports.tar.gz\">Выкачайте gzip архив содержащий все
-$portnumber портов</A> (около 15 Мегабайт) или просмотрите следующие
+присутствуют $portnumber портированных на FreeBSD программ.<br>
+<A HREF=\"$baseFTP/ports.tar.gz\">Сгрузите gzip-архив, содержащий все
+$portnumber портов</A> (около 19 Мегабайт) или просмотрите следующие
 категории:\n";
 
     print MOUTF "<UL>\n";