blob: e77788f61431a178e78665f3f63913499baf9134 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
|
<SELECT NAME="usernum">
% unless ( $opt{'multiple'} || $opt{'disable_empty'} ) {
<OPTION VALUE="">all</OPTION>
% }
% foreach my $usernum (
% sort { $opt{'access_user'}->{$a} cmp $opt{'access_user'}->{$b} }
% keys %{ $opt{'access_user'} }
% ) {
<OPTION VALUE="<%$usernum%>"><% $opt{'access_user'}->{$usernum} %></OPTION>
% }
</SELECT>
<%init>
my %opt = @_;
$opt{'access_user'} ||= $FS::CurrentUser::CurrentUser->access_users_hashref();
</%init>
|