summaryrefslogtreecommitdiff
path: root/rt/webrt/Ticket/Elements/ShowKeywordSelects
blob: 4f8a1786b91146c513912d547b10599378d691ff (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
<TABLE>
% while ( my $KeywordSelect = $KeywordSelects->Next ) {
    <TR>
      <TD VALIGN=TOP>
	<% $KeywordSelect->Name %><BR>
      </TD>
      <TD VALIGN=TOP>
	<UL>
% my $Keywords = $Ticket->KeywordsObj($KeywordSelect->Id);
% while (my $Keyword = $Keywords->Next) { 
	<li><% $Keyword->KeywordObj->RelativePath($KeywordSelect->KeywordObj) |n %></li>

%   }
	</ul>
      </TD>
    </TR>
% }
</TABLE>

<%INIT>
my $KeywordSelects = $Ticket->QueueObj->KeywordSelects;
</%INIT>

<%ARGS>
$Ticket => undef
</%ARGS>