<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>