Line # Revision Author
1 3 ahitrov@rambler.ru <!-- ��������� ������� -->
2 <fieldset>
3 <legend>�������������� ���������� ��������</legend>
4
5 <style>
6 ul.listtypes {margin:0 0 0 20px; padding:0 0 0 1.5em;}
7 ul.listtypes li {list-style-image:url(/contenido/i/nav-2-a.gif)}
8 ul.listtypes li.active {list-style-image:url(/contenido/i/nav-2.gif)}
9 </style>
10
11 121 ahitrov <ul class="listtypes" style="font-size:11px;font-family:Tahoma;text-align:left;">
12 3 ahitrov@rambler.ru <li>���������:
13 <ul>
14 % for my $class (sort {$a->class_name cmp $b->class_name} @{ $state->{available_documents} })
15 % {
16 % my $document = new $class ($keeper);
17 <li class="active"><a href="tuning.html?proto=documents&class=<% $class %>"><% $class->class_name %></a>
18 % }
19 </ul>
20
21 <li>������:
22 <ul>
23 % for my $class (sort {$a->class_name cmp $b->class_name} @{ $state->{available_sections} })
24 % {
25 % my $document = new $class ($keeper);
26 <li class="active"><a href="tuning.html?proto=sections&class=<% $class %>"><% $class->class_name %></a>
27 % }
28 </ul>
29
30 <li>�����:
31 <ul>
32 % for my $class (sort {$a->class_name cmp $b->class_name} @{ $state->{available_links} })
33 % {
34 % my $document = new $class ($keeper);
35 <li class="active"><a href="tuning.html?proto=links&class=<% $class %>"><% $class->class_name %></a>
36 % }
37 </ul>
38
39 <li>������������:
40 <ul>
41 % for my $class (sort {$a->class_name cmp $b->class_name} @{ $state->{available_users} })
42 % {
43 % my $document = new $class ($keeper);
44 <li class="active"><a href="tuning.html?proto=users&class=<% $class %>"><% $class->class_name %></a>
45 % }
46 </ul>
47
48 <li>������ �������:
49 <ul>
50 % for my $class (sort {$a->class_name cmp $b->class_name} @{ $state->{available_locals} })
51 % {
52 % my $document = new $class ($keeper);
53 <li class="active"><a href="tuning.html?proto=locals&class=<% $class %>"><% $class->class_name %></a>
54 % }
55 </ul>
56
57 </ul>
58 </fieldset>
59
60 <%ONCE>
61 use locale;
62 </%ONCE>