<UL>
%while(my $ACE = $ACL->Next) {

<LI><checkbox name="delete_ace_<%$ACE->id%>"> <%$ACE->RightName%> (<%$ACE->UserObj->RealName%>)

%}
</UL>

<%INIT>
my $ACL = new RT::ACL($session{'CurrentUser'});
$ACL->LimitToQueue($QueueObj->id);
$ACL->LimitPrincipalToUser($PrincipalId);
</%INIT>
<%ARGS>
$PrincipalId => undef
$QueueObj => undef
</%ARGS>
