summaryrefslogtreecommitdiff
path: root/rt/webrt/Ticket/Elements/EditWatchers
blob: 00185e8f909f7ced4f84ef1cf02f97f168ed2564 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
%# $Header: /home/cvs/cvsroot/freeside/rt/webrt/Ticket/Elements/Attic/EditWatchers,v 1.1 2002-08-12 06:17:09 ivan Exp $
%# Copyright 1996-2000 Jesse Vincent <jesse@fsck.com>

<ul>

%# Print out a placeholder if there are none.
%if ($watchers->Count == 0 ) {
<li><i>none</i>
% }


%while (my $watcher=$watchers->Next) {
<li>
<INPUT TYPE=CHECKBOX NAME="DelWatcher<%$watcher->id%>" UNCHECKED>
%#If there's a principal backing this user, lets give a link to their
%# account
%if ($watcher->IsUser) { 
<a href="<%$RT::WebPath%>/Admin/Users/Modify.html?id=<%$watcher->OwnerObj->id%>">
<%$watcher->OwnerObj->RealName%></a>:
%} else {
Email address:
%}
<i><%$watcher->Email%></i>
%}
</ul>
<%INIT>
my ($watchers, $watcher, $set);
if ($Type  =~ /^request/i) {
       $watchers = $TicketObj->Requestors;
       }
elsif ($Type =~ /^admin/i) {
        $watchers = $TicketObj->AdminCc;
        }
elsif ($Type =~ /^cc/i) {
        $watchers = $TicketObj->Cc;
      }
else { $watchers = $TicketObj->Watchers;
       }
</%INIT>
<%ARGS>
$TicketObj => undef
$Type => undef
</%ARGS>