| 1 |
3 |
ahitrov@rambler.ru |
<& "/contenido/components/header.msn", style => 'index' &> |
| 2 |
|
|
<& "/contenido/components/naviline.msn" &> |
| 3 |
|
|
|
| 4 |
|
|
<table width="100%" cellspacing="0" cellpadding="0" border="0"> |
| 5 |
|
|
<tr valign="top"> |
| 6 |
|
|
<td width="35%"> |
| 7 |
|
|
|
| 8 |
|
|
% my @LEFT = $m->comp('/contenido/components/tasks.msn'); |
| 9 |
|
|
% my %LEFTh = map { $_->{attr} => $_ } (@LEFT); |
| 10 |
|
|
% if (ref($request->{tab}->{lefts})) |
| 11 |
|
|
% { |
| 12 |
|
|
% for my $left (@{ $request->{tab}->{lefts} }) |
| 13 |
|
|
% { |
| 14 |
|
|
% next if (! exists($LEFTh{$left})); |
| 15 |
|
|
<& 'components/'.$LEFTh{$left}->{component}, %ARGS &> |
| 16 |
|
|
% } |
| 17 |
|
|
% } |
| 18 |
|
|
|
| 19 |
|
|
</td> |
| 20 |
|
|
<td width="2%" nowrap> </td> |
| 21 |
|
|
<td width="63%"> |
| 22 |
|
|
|
| 23 |
|
|
<& "/contenido/components/index_tree.msn", root => $Contenido::Section::ROOT, level => $request->{tab}{level} || 3 &> |
| 24 |
|
|
|
| 25 |
|
|
</td> |
| 26 |
|
|
</tr> |
| 27 |
|
|
</table> |
| 28 |
|
|
|
| 29 |
|
|
</body> |
| 30 |
|
|
</html> |