><% $opt{empty_label} %> % foreach my $queueid ( sort { $a <=> $b } keys %queues ) { ><% $queueid %>: <% $queues{$queueid} %> % } % while ( @post_options ) { % my $post_opt = shift(@post_options); % my $post_label = shift(@post_options); % my $selected = ( $opt{curr_value} eq $post_opt ); ><% $post_label %> % } <%init> my %opt = @_; my $conf = new FS::Conf; my %queues = (); if ( $conf->config('ticket_system') ) { %queues = FS::TicketSystem->queues(); } my @post_options = $opt{post_options} ? @{ $opt{post_options} } : ();