--- register/prgsrc/register.cgi 2002/11/04 05:02:13 1.13 +++ register/prgsrc/register.cgi 2002/11/18 03:36:26 1.14 @@ -20,11 +20,11 @@ Boris Veytsman =head1 DATE -$Date: 2002/11/04 05:02:13 $ +$Date: 2002/11/18 03:36:26 $ =head1 REVISION -$Revision: 1.13 $ +$Revision: 1.14 $ =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: 2002/11/18 03:36:26 $'; $date =~ s/[^ ]* ([^ ]*) .*/$1/; @@ -561,7 +561,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'}) {