<%$Size%> <%$Multiple%>> - (empty) % foreach my $kid ( keys %{$Descendents} ) { <% $Descendents->{$kid} %> % } <%INIT> unless (defined $KeywordObj) { $KeywordObj = new RT::Keyword($session{'CurrentUser'}); $KeywordObj->Load($Root); } my $Descendents = $KeywordObj->Descendents(); if ($Multiple) { $Multiple = "MULTIPLE"; } if ($Size) { $Size="SIZE=$Size"; } <%ARGS> $Multiple => undef $Size => undef $Name => 'Keyword' $KeywordObj => undef $Root => 0 $Default => undef