reverting to vendor branch rt 3.0.4, hopefully
[freeside.git] / rt / webrt / Ticket / Elements / ShowRequestor
diff --git a/rt/webrt/Ticket/Elements/ShowRequestor b/rt/webrt/Ticket/Elements/ShowRequestor
deleted file mode 100644 (file)
index fcbe71d..0000000
+++ /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>