%# $Header: /raid/cvsroot/rt/webrt/Elements/SelectStatus,v 1.2 2001/11/06 23:06:58 jesse Exp $

<SELECT NAME ="<%$Name%>">
<OPTION VALUE="">-</OPTION>
%foreach my $status (@status) {
<OPTION VALUE="<%$status%>" <%($Default eq $status) && 'SELECTED'%>><%$status%></OPTION>
% }
</SELECT>
<%ONCE>
my $queue = new RT::Queue($session{'CurrentUser'});
my @status = $queue->StatusArray();
</%ONCE>
<%ARGS>
$Name => undef
$Default => undef
 
</%ARGS>
