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>
|