<%args> $id => undef <%init> my $ticket = RT::Ticket->new($session{'CurrentUser'}); $ticket->Load($id); ProcessObjectCustomFieldUpdates(Object => $ticket, ARGSRef => \%ARGS); my $whiteboard = $ticket->QueueObj->CustomField('Whiteboard'); my $Values = $ticket->CustomFieldValues($whiteboard->Id); my $comp = "/Elements/ShowCustomField".$whiteboard->Type; % if ($whiteboard->CurrentUserHasRight('ModifyCustomField')) { [<&|/l&>Edit] [<&|/l&>Expand] %} % if ($whiteboard->id) {
% while (my $Value = $Values->Next()) { % if ($m->comp_exists($comp)) { <& $comp, Object => $Value &> % } else { <% $Value->Content %> % } % } % } else { <&|/l&>No "Whiteboard" field for this ticket. % }
%$m->abort();