diff options
Diffstat (limited to 'httemplate/elements/select-user.html')
-rw-r--r-- | httemplate/elements/select-user.html | 33 |
1 files changed, 0 insertions, 33 deletions
diff --git a/httemplate/elements/select-user.html b/httemplate/elements/select-user.html deleted file mode 100644 index ec2341be6..000000000 --- a/httemplate/elements/select-user.html +++ /dev/null @@ -1,33 +0,0 @@ -<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 = @_; - -unless ( $opt{'access_user'} ) { - - my $sth = dbh->prepare(" - SELECT usernum, username FROM access_user - WHERE disabled = '' or disabled IS NULL - ") or die dbh->errstr; - $sth->execute or die $sth->errstr; - while ( my $row = $sth->fetchrow_arrayref ) { - $opt{'access_user'}->{$row->[0]} = $row->[1]; - } - -} - -</%init> |