blob: 053cff1225705ac92aa2f8fe73e9d16e3ea85e7e (
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
47
48
49
50
51
52
53
54
|
<BR>
<%$msg%><br>
Add new watchers:<br>
<table>
% if ($Users) {
<tr><td>
Type
</td><td>
Username
</td></tr>
% while (my $u = $Users->Next ) {
<tr><td><&/Elements/SelectWatcherType, Name => "WatcherTypeUser".$u->Id &></td><td><%$u->Name%> (<%$u->RealName%>)</td></tr>
% }
% }
<tr><td>
Type
</td><td>
Email
</td></tr>
<tr><td>
<&/Elements/SelectWatcherType, Name => "WatcherTypeEmail1" &>
</td><td>
<input name="WatcherAddressEmail1" size=15>
</td></tr>
<tr><td>
<&/Elements/SelectWatcherType, Name => "WatcherTypeEmail2" &>
</td><td>
<input name="WatcherAddressEmail2" size=15>
</td></tr>
<tr><td>
<&/Elements/SelectWatcherType, Name => "WatcherTypeEmail3" &>
</td><td>
<input name="WatcherAddressEmail3" size=15>
</td></tr>
</table>
<%INIT>
my ($msg, $Users);
if ($UserString) {
$Users = new RT::Users($session{'CurrentUser'});
$Users->Limit(FIELD => $UserField,
VALUE => $UserString,
OPERATOR => $UserOp);
}
</%INIT>
<%ARGS>
$UserField => 'Name'
$UserOp => '='
$UserString => undef
</%ARGS>
|
