diff options
| author | ivan <ivan> | 2002-08-12 06:17:09 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2002-08-12 06:17:09 +0000 |
| commit | 3ef62a0570055da710328937e7f65dbb2c027c62 (patch) | |
| tree | d549158b172fd499b4f81a2981b62aabbde4f99b /rt/webrt/Elements/SelectKeywordOptions | |
| parent | 030438c9cb1c12ccb79130979ef0922097b4311a (diff) | |
import rt 2.0.14
Diffstat (limited to 'rt/webrt/Elements/SelectKeywordOptions')
| -rw-r--r-- | rt/webrt/Elements/SelectKeywordOptions | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/rt/webrt/Elements/SelectKeywordOptions b/rt/webrt/Elements/SelectKeywordOptions new file mode 100644 index 000000000..f56dfe52c --- /dev/null +++ b/rt/webrt/Elements/SelectKeywordOptions @@ -0,0 +1,18 @@ +<PERL> +while (my $keyword = $keywords->Next()) { + my ($selected); + if $keyword->Id == $default +</PERL> +<OPTION VALUE="<%$keyword->id%>"><% '-' x $depth %><%$keyword->Name%></OPTION> +<& SelectKeywordOptions, depth => ($depth+1), root => $keyword->id &> +%} +<%INIT> + +my $keywords = new RT::Keywords($session{'CurrentUser'}); +$keywords->LimitToParent($root); + +</%INIT> +<%ARGS> +$root => undef +$depth => 0 +</%ARGS>
\ No newline at end of file |