| 1 |
3 |
ahitrov@rambler.ru |
<%args> |
| 2 |
|
|
|
| 3 |
|
|
$root => $Contenido::Section::ROOT |
| 4 |
|
|
$level => 3 |
| 5 |
|
|
$selected => undef |
| 6 |
|
|
|
| 7 |
|
|
</%args> |
| 8 |
|
|
<%init> |
| 9 |
|
|
|
| 10 |
|
|
my $section_tree = exists $request->{section_tree} ? $request->{section_tree} : $keeper->get_section_tree(); |
| 11 |
|
|
$request->{section_tree} ||= $section_tree; |
| 12 |
|
|
|
| 13 |
|
|
$m->comp('/contenido/components/select_index_tree_elem.msn', |
| 14 |
|
|
section_tree => $section_tree, |
| 15 |
|
|
root => $section_tree->{root} || $section_tree->{0}, |
| 16 |
|
|
offset => 0, |
| 17 |
|
|
count_offset => $level, |
| 18 |
|
|
selected => $selected |
| 19 |
|
|
); |
| 20 |
|
|
|
| 21 |
|
|
</%init> |