version 1.150, 2008/11/14 11:23:03
|
version 1.151, 2008/11/29 08:51:29
|
Line 1298 sub PrintTour {
|
Line 1298 sub PrintTour {
|
$output .= hr({-'align'=>'center', -'width'=>'80%'}); |
$output .= hr({-'align'=>'center', -'width'=>'80%'}); |
|
|
if ($Tournament{'URL'}) { |
if ($Tournament{'URL'}) { |
$output .= |
$URL = $Tournament{'URL'}; |
p("Дополнительная информация об этом турнире - по адресу " . |
$URL=~s/http:\/znatoki\/boris\/reports\//$newsurl/ if $url=~/kulichki/ || $url=~/db.chgk.info/; |
a({-'href'=>$Tournament{'URL'}}, $Tournament{'URL'})); |
$URL=~s/\/znatoki\/boris\/reports\//$newsurl/ if url=~/kulichki/ || $url=~/db.chgk.info/; |
|
|
|
$output .= |
|
p("Дополнительная информация об этом турнире - по адресу " . |
|
a({-'href'=>$URL}, $URL)); |
} |
} |
|
|
if ($Tournament{'Copyright'}) { |
if ($Tournament{'Copyright'}) { |
$output .= p("Копирайт: " . $Tournament{'Copyright'}); |
$output .= p("Копирайт: " . $Tournament{'Copyright'}); |
} |
} |
|
|
if ($Tournament{'Info'}) { |
if ($Tournament{'Info'} ) { |
$output .= p($Tournament{'Info'}); |
$output .= p($Tournament{'Info'}); |
} |
} |
|
|
if ($Tour{'Info'}) { |
if ($Tour{'Info'} && ($Tournament{'Info'} ne $Tour{'Info'})) { |
$output .= p($Tour{'Info'}); |
$output .= "!!".p($Tour{'Info'}); |
} |
} |
|
|
$output.=p("<a href='/dbxml.php?tour=".param('tour')."'>XML</a>"); |
$output.=p("<a href='/dbxml.php?tour=".param('tour')."'>XML</a>"); |