--- register/prgsrc/register.cgi	2002/11/04 05:02:13	1.13
+++ register/prgsrc/register.cgi	2003/07/16 02:08:28	1.16
@@ -20,11 +20,11 @@ Boris Veytsman
 
 =head1 DATE
 
-$Date: 2002/11/04 05:02:13 $
+$Date: 2003/07/16 02:08:28 $
 
 =head1 REVISION
 
-$Revision: 1.13 $
+$Revision: 1.16 $
 
 =cut
 
@@ -45,7 +45,7 @@ my ($SENDMAIL) = "mail";
 my $TO = 'borisv@lk.net, igra@gorlovka.net, erudit@mail.od.ua';
 my $FROM = 'borisv@lk.net';
 
-my $date='$Date: 2002/11/04 05:02:13 $';
+my $date='$Date: 2003/07/16 02:08:28 $';
 $date =~ s/[^ ]* ([^ ]*) .*/$1/; 
 
 
@@ -53,7 +53,7 @@ my $dbh = DBI->connect("DBI:mysql:chgk",
     or do {
 	print h1("Временные проблемы") . "База данных временно не
 			работает. Заходите попозже.";
-	print &Include_virtual("../dimrub/db/reklama.html");
+	print &Include_virtual("../../dimrub/db/reklama.html");
 	print end_html;
 	die "Can't connect to DB chgk\n";
     };
@@ -66,12 +66,12 @@ print header(-charset=>'koi8-r');
 ##################################################
 print start_html(-"title"=>'Register of Clubs',
 		 -author=>'borisv@lk.net',
-		 -background=>"../images/map.jpg");
-print &Include_virtual("../dimrub/db/reklama.html");
+		 -background=>"../../images/map.jpg");
+print &Include_virtual("../../dimrub/db/reklama.html");
 print <<END;
 <table>
 <tr>
-<td background=../images/compass.gif valign=top>
+<td background=../../images/compass.gif valign=top>
 END
 
 ################################################
@@ -126,7 +126,7 @@ END
 Журнал "Игра"<br>
 и<br>
 <a href="/znatoki/klub/znat.html"><img 
-ismap border=0 src= "../images/logo.gif" 
+ismap border=0 src= "../../images/logo.gif" 
 alt="Интернет Клуб Что? Где? Когда?" width=319 height=27></a>
 <br>ПРЕДСТАВЛЯЮТ<br>
 Регистр Клубов Интеллектуальных Игр
@@ -174,7 +174,7 @@ END
 </dl>
 <p align=center>
 END
-print &Include_virtual("../boris/register/regions.html");
+print &Include_virtual("../../boris/register/regions.html");
 print <<END;
 </p>
 END
@@ -189,15 +189,12 @@ END
     $sth->finish;
 
     print "<p align=center>";
-    print "Всего клубов: $count<br>\n";
-    print "Эту страничку посмотрели ";
-    print `/home/piataev/public_html/cgi-bin/counter.sh /znatoki/cgi-bin/register.cgi`;
-    print " раз(а)</p>\n";
+    print "Всего клубов: $count</p>\n";
     
     print <<END;
 <hr>
 <address>
-<img width = 60 height = 80 src="../images/owl.gif" alt = "owl"> 
+<img width = 60 height = 80 src="../../images/owl.gif" alt = "owl"> 
 <a href="http://users.lk.net/~borisv">
 Boris Veytsman</a>, $date
 </address>
@@ -561,7 +558,7 @@ SELECT * FROM People WHERE pid=$args{'pi
 
     if (my $string=$person->{'URL'}) {
 	$string = htmlize($string);
-	push @entries, "Домашнаяя страничка: $string";
+	push @entries, "Домашняя страничка: $string";
     }
 
     if (my $string=$person->{'Phone'}) {