summaryrefslogtreecommitdiff
path: root/httemplate/elements/select-agent.html
diff options
context:
space:
mode:
Diffstat (limited to 'httemplate/elements/select-agent.html')
-rw-r--r--httemplate/elements/select-agent.html24
1 files changed, 24 insertions, 0 deletions
diff --git a/httemplate/elements/select-agent.html b/httemplate/elements/select-agent.html
new file mode 100644
index 000000000..c2a5e4bde
--- /dev/null
+++ b/httemplate/elements/select-agent.html
@@ -0,0 +1,24 @@
+<%
+ my( $agentnum, %opt ) = @_;
+
+ my @agents;
+ if ( $opt{'agents'} ) {
+ @agents = @{ $opt{'agents'} };
+ } else {
+ @agents = qsearch( 'agent', { disabled=>'' } );
+ }
+
+%>
+
+<SELECT NAME="agentnum">
+
+ <OPTION VALUE="">all</OPTION>
+
+ <% foreach my $agent ( sort { $a->agent cmp $b->agent } @agents ) { %>
+
+ <OPTION VALUE="<%= $agent->agentnum %>"<%= $agentnum == $agent->agentnum ? ' SELECTED' : '' %>><%= $agent->agent %>
+
+ <% } %>
+
+</SELECT>
+