diff options
Diffstat (limited to 'rt/webrt/Ticket/Elements/ShowRequestor')
-rw-r--r-- | rt/webrt/Ticket/Elements/ShowRequestor | 35 |
1 files changed, 0 insertions, 35 deletions
diff --git a/rt/webrt/Ticket/Elements/ShowRequestor b/rt/webrt/Ticket/Elements/ShowRequestor deleted file mode 100644 index fcbe71df1..000000000 --- a/rt/webrt/Ticket/Elements/ShowRequestor +++ /dev/null @@ -1,35 +0,0 @@ -<%PERL> -my $people = $Ticket->Requestors; -while (my $requestor=$people->Next) { -if (($requestor->Owner ) && (my $user=$requestor->OwnerObj)) { -my $name=$user->RealName || $user->EmailAddress; -my $tickets = new RT::Tickets($session{'CurrentUser'}); -$tickets->LimitRequestor(VALUE => $user->EmailAddress); -$tickets->LimitStatus( VALUE => 'open'); -$tickets->LimitStatus( VALUE => 'new'); -$tickets->RowsPerPage(25); -$tickets->OrderBy(FIELD => 'Priority', - ORDER => 'DESC'); -</%PERL> - -% unless ($user->Privileged) { -<& /Elements/TitleBoxStart, - title => "<a class='inverse' href=\"$RT::WebPath/Admin/Users/Modify.html?id=".$user->id."\">More about $name</a>" &> - -Comments about this user:<BR> -<B><% ($user->Comments || "No comment entered about this user") %></B><BR> - -This user's 25 highest priority tickets:<BR> -<UL> -%while (my $w=$tickets->Next) { -<LI><%$w->Id%>: <a href="<%$RT::WebPath%>/Ticket/Display.html?id=<%$w->id%>"><%$w->Subject%></a> (<%$w->Status%>) -%} -</UL> -<& /Elements/TitleBoxEnd &> - -% } -% } -%} -<%ARGS> -$Ticket=>undef -</%ARGS> |