diff options
author | ivan <ivan> | 2002-08-12 06:17:09 +0000 |
---|---|---|
committer | ivan <ivan> | 2002-08-12 06:17:09 +0000 |
commit | 3ef62a0570055da710328937e7f65dbb2c027c62 (patch) | |
tree | d549158b172fd499b4f81a2981b62aabbde4f99b /rt/webrt/Elements/ViewUser | |
parent | 030438c9cb1c12ccb79130979ef0922097b4311a (diff) |
import rt 2.0.14
Diffstat (limited to 'rt/webrt/Elements/ViewUser')
-rw-r--r-- | rt/webrt/Elements/ViewUser | 29 |
1 files changed, 29 insertions, 0 deletions
diff --git a/rt/webrt/Elements/ViewUser b/rt/webrt/Elements/ViewUser new file mode 100644 index 000000000..92446e6ef --- /dev/null +++ b/rt/webrt/Elements/ViewUser @@ -0,0 +1,29 @@ + +<& /Elements/TitleBoxStart, + title => "<a class='inverse' href=\"$RT::WebPath/Search/Listing.html?LimitRequestorById=1&IdOfRequestor=".$User->id."\">Tickets from $name</a>", + titleright=> "<a class='inverse' href=\"$RT::WebPath/EditUserComments.html?id=".$User->id."\">Comments about $name</a>" &> +<TABLE WIDTH="100%"> +<tr> +<td halign=left valign=top> +%while (my $w=$tickets->Next) { +<%$w->Id%>: <a href="<%$RT::WebPath%>/Ticket/Display.html?id=<%$w->id%>"><%$w->Subject%></a> (<%$w->Status%>)<BR> +%} +</td> +<td align=right valign=top> + <% ($User->Comments || "No comment entered about this user") %> +</tr> +</table> +<& /Elements/TitleBoxEnd &> + +<%ARGS> +$User=>undef +</%ARGS> + +<%INIT> +my $name=$User->RealName || $User->EmailAddress; + +my $tickets = new RT::Tickets($session{'CurrentUser'}); +$tickets->LimitRequestor(VALUE => $User->EmailAddress); + + +</%INIT> |