<%init> # Don't let users who aren't logged in do anything return unless ($session{'CurrentUser'}); # Don't let users who can't see the service updates queue see things my $queue = RT::Queue->new($session{'CurrentUser'}); $queue->LoadByCols(Name => 'Service Updates'); return unless ($queue->CurrentUserHasRight('ShowTicket')); my $updates = RT::Tickets->new($session{'CurrentUser'}); $updates->FromSQL(qq{Queue = "Service Updates" AND (Status = 'new' OR Status = 'open')}); #return unless($updates->count());
<&|/l&>Service Updates: % while ( my $update = $updates->Next) { % my $path = $RT::WebPath."/ServiceUpdate/Show/".$update->id; • <%$update->Subject%> % }
% my $path = $RT::WebPath."/ServiceUpdate/Edit/"; <&|/l&>create