Line # Revision Author
1 8 ahitrov@rambler.ru
2 % if ($filter)
3 % {
4 % my $section = $keeper->get_section_by_id($filter);
5 % if (ref ($section))
6 % {
7 <style>
8 <!--
9 117 ahitrov div.ftr {font-size:11px; font-family:Tahoma; padding:15px 0;}
10 8 ahitrov@rambler.ru div.ftr h3 a {color:#000000;}
11 div.ftr h3 {font-size:130%; color:#FFFFFF; margin:0px; padding:8px; background-color:#8093B0;}
12 div.ftr i {font-style:normal;color:#777777;}
13 div.ftr div.descr {padding:0px 10px;}
14 -->
15 </style>
16
17 <div class="ftr">
18 <h3>Фильтр: <% $section->name() %> &nbsp; <a href="/contenido/?unset_context=filter">(x) снять фильтр</a> </h3>
19 <div class="descr"><i>В качестве фильтра может выступать любая секция. Если фильтр установлен, то во всех списках и результатах поисков будут показаны только те документы, которые входят, в том числе, и в секцию фильтра</div>
20 </div>
21 % }
22 % }
23
24 <!-- Навигация -->
25 <div class="npath">
26 <b>Вы находитесь:</b>&nbsp;
27 <%perl>
28
29 my @path = $sect->trace();
30
31 my $i = 0;
32 foreach my $p (@path)
33 {
34 my $step = $keeper->get_section_by_id($p);
35
36 $m->out("<a href=\"sections.html?id=$step->{id}\">$step->{name}</a>");
37 if ($i < scalar(@path) - 1)
38 {
39 $m->out(" &gt;&gt; ");
40 }
41 $i++;
42 }
43
44 </%perl>
45 </div>
46
47 <%ARGS>
48
49 $sect_id => 1
50
51 </%ARGS>
52 <%INIT>
53
54 use vars qw($keeper $state $project);
55 my $sect = $keeper->get_section_by_id($sect_id);
56
57 my $filter = $m->comp('/contenido/components/context.msn', name => 'filter');
58 my $profile = $m->comp('/contenido/components/context.msn', name => 'profile');
59
60 </%INIT>