Revision 8 (by ahitrov@rambler.ru, 2010/03/29 11:46:38) |
Contenido UTF-8 core files
|
<& "/contenido/components/header.msn", title => 'Ключевые слова' &>
<br>
<table border="0" style="font-size:85%;" width="80%">
<tr>
<td width="10"></td>
<td>
<div style="font-size:130%;">Ключевые слова</div>
<br>
На этой страницы Вы видите полный список ключевых слов. При нажатии на ключевое слово Вы попадете на редактирование
документа, к которому привязано это ключевое слово. Каждое слово может быть привязано только к одному документу.
<p>
Обратите внимание, что ключевые слова на сайте обновляются не моментально, а в течении часа.
</td>
</tr>
<tr>
<td></td>
<td>
<br><br>
<div style="font-size:130%;">Список</div>
<!-- Список ключевых слов -->
% my $divider = scalar(@keywords) / 5;
% if ($divider < 25) { $divider = 200 };
<table border=0 cellpadding=0 cellspacing=0 style="font-size:98%">
<tr>
<td width="20%">
% my $count = 0;
% for my $KEY (sort { $a->{keyword} cmp $b->{keyword} } (@keywords))
% {
% my $document = $keeper->get_document_by_id($KEY->{id});
% my $unlinked = $document->section ? 0 : 1;
% my $document_access = $user->section_accesses($user, $document->section);
% my $href = $document_access == 2 || $unlinked;
% if (((++ $count) % $divider) == 0)
% {
</td><td>
% }
<% $href ? '<a href="/contenido/document.html?id=' . $KEY->{id} . '">' : '' %><% $unlinked ? '<i>' : '' %><% $KEY->{keyword} %><% $unlinked ? '</i>' : '' %><% $href ? '</a>' : '' %><br>
% }
</td>
</tr>
</table>
</td>
</tr>
</table>
</body>
</html>
<%init>
use vars qw($project $state $user $keeper $request);
my @keywords = $keeper->get_keywords();
</%init>