diff options
author | cvs2git <cvs2git> | 2002-08-12 06:17:10 +0000 |
---|---|---|
committer | cvs2git <cvs2git> | 2002-08-12 06:17:10 +0000 |
commit | 160be29a0dc62e79a4fb95d2ab8c0c7e5996760e (patch) | |
tree | 94ebadb17321b138fd7bfd9a5c379eec97c5d328 /rt/webrt/Elements/SelectKeyword | |
parent | 3ef62a0570055da710328937e7f65dbb2c027c62 (diff) |
This commit was manufactured by cvs2svn to create branch 'BESTPRACTICAL'.
Diffstat (limited to 'rt/webrt/Elements/SelectKeyword')
-rw-r--r-- | rt/webrt/Elements/SelectKeyword | 38 |
1 files changed, 0 insertions, 38 deletions
diff --git a/rt/webrt/Elements/SelectKeyword b/rt/webrt/Elements/SelectKeyword deleted file mode 100644 index c4bd9e1aa..000000000 --- a/rt/webrt/Elements/SelectKeyword +++ /dev/null @@ -1,38 +0,0 @@ -<SELECT NAME=<%$Name%> <%$Size%> <%$Multiple%>> -<OPTION VALUE="">-</OPTION> -<OPTION VALUE="NULL">(empty)</OPTION> -% foreach my $kid ( keys %{$Descendents} ) { -<OPTION VALUE="<% $kid %>" -%if ($kid == $Default) { -SELECTED -%} -><% $Descendents->{$kid} %></OPTION> -% } -</SELECT> - - -<%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"; -} - - -</%INIT> -<%ARGS> -$Multiple => undef -$Size => undef -$Name => 'Keyword' -$KeywordObj => undef -$Root => 0 -$Default => undef -</%ARGS> |