<& /Elements/Header, Title => loc('#[_1]: [_2]', $p->id, $p->name) &> % unless ($printable) { <& /Ticket/Elements/Tabs, Ticket => undef, current_tab => 'Projects/Display.html', Title => loc('#[_1]: [_2]', $p->id, $p->name) &> [more] [calendar] [ical] ">[print] % } else {

<% loc('#[_1]: [_2]', $p->id, $p->name) %>

% }

Managed by: <% $p->queue %>
Priority: <% $p->priority %>
Status: <% $p->status %>
People: <% $p->get_summary_people_as_string %>
Issues: <% $p->get_summary_issues_as_string %>
% my $details = $p->get_details; % for my $content_name (keys %$details) { % my $content = $details->{$content_name}; % my $wiki_content = $content ? Text::WikiFormat::format( $content."\n" , {}, { extended => 1, absolute_links => 1 }) : '';

<% $content_name %>

<%$wiki_content|n%> % }

Milestones

% for my $ms ($p->get_milestones_by_due_date) { % }

<& /Projects/Elements/StatusIndicator, status => $ms->status &> <% Blinck::RT::Utils::as_simple_date($ms->due_date) %>	(<% Blinck::RT::Utils::as_friendly_time_left($ms->due_date) %>)	<% loc('#[_1]: [_2]', $ms->id, $ms->name) %> [more]
% for my $t ($ms->get_tasks_by_priority) { <& /Projects/Elements/StatusIndicator, status => $t->Status &> <% loc('#[_1]: [_2]', $t->Id, $t->Subject) %> [more] % }

Tasks

<%perl> for my $ticket ($p->get_tasks_by_priority) { <& /Projects/Elements/StatusIndicator, status => $ticket->Status &> <% loc('#[_1]: [_2]', $ticket->Id, $ticket->Subject) %> [more]
Owner : <% $ticket->OwnerObj->Name %>; Priority : <% $ticket->Priority %>
Status : <% $ticket->Status %>; Queue : <% $ticket->QueueObj->Name %>

<%perl> }

% if ($printable) {

% } <%ARGS> $id => undef $printable => undef <%INIT> use Text::WikiFormat; my $TicketObj = LoadTicket($id); unless ($TicketObj->CurrentUserHasRight('ShowTicket')) { Abort("No permission to view ticket"); } unless ($TicketObj->Subject =~ Blinck::RT::Utils::regex_project()) { Abort("ticket/$id is not a project"); } my $p = Blinck::RT::Project->new; $p->load_by_id($id); $p->find_members;