version 1.145, 2006/09/30 22:16:48
|
version 1.146, 2008/02/09 10:40:59
|
Line 287 sub tourhref {
|
Line 287 sub tourhref {
|
$res=~s/(\#\d+)(.*)$/$2$1/; |
$res=~s/(\#\d+)(.*)$/$2$1/; |
my $t=$res; |
my $t=$res; |
$t=~s/\#.*$//; |
$t=~s/\#.*$//; |
$res=~s/\.1// unless -e "$realHTMLDIR$t"; |
# $res=~s/\.1// unless $gr ||$res=~/\.\d+$/;#-e "$realHTMLDIR$t"; |
$t=$res; |
$t=$res; |
$t=~s/\#.*$//; |
$t=~s/\#.*$//; |
# $res=~s/\.html/-q\.html/ unless -e "$realHTMLDIR$t"; |
# $res=~s/\.html/-q\.html/ unless -e "$realHTMLDIR$t"; |
Line 1194 sub PrintTournament {
|
Line 1194 sub PrintTournament {
|
p("Дополнительная информация об этом турнире - по адресу " . |
p("Дополнительная информация об этом турнире - по адресу " . |
a({-'href'=>$URL}, $URL)); |
a({-'href'=>$URL}, $URL)); |
} |
} |
|
|
if ($Copyright) { |
if ($Copyright) { |
$output .= p("Копирайт: " . $Copyright); |
$output .= p("Копирайт: " . $Copyright); |
} |
} |
Line 1204 sub PrintTournament {
|
Line 1203 sub PrintTournament {
|
if ($Info) { |
if ($Info) { |
$output .= p($Info); |
$output .= p($Info); |
} |
} |
|
|
|
$output.=p("<a href='/dbxml.php?tour=".param('tour')."'>XML</a>"); |
|
|
|
|
return $output; |
return $output; |
} |
} |
|
|
Line 1299 sub PrintTour {
|
Line 1302 sub PrintTour {
|
if ($Tournament{'Info'}) { |
if ($Tournament{'Info'}) { |
$output .= p($Tournament{'Info'}); |
$output .= p($Tournament{'Info'}); |
} |
} |
|
$output.=p("<a href='/dbxml.php?tour=".param('tour')."'>XML</a>"); |
|
|
my $n=$Tour{'Number'}; |
my $n=$Tour{'Number'}; |
if ($answer == 0) { |
if ($answer == 0) { |