This commit was generated by cvs2svn to compensate for changes in r12472,
[freeside.git] / rt / share / html / m / ticket / select_create_queue
1 <%init>
2 my $queues = RT::Queues->new($session{'CurrentUser'});
3 $queues->UnLimit();
4
5 </%init>
6 <&| /m/_elements/wrapper, title => loc("Create a ticket") &>
7 <div class="select_queue">
8 <&|/Widgets/TitleBox, title => loc("Select a queue") &>
9 <ul class="menu">
10 % while (my $q = $queues->Next()) {
11 % next if (! $q->CurrentUserHasRight('CreateTicket'));
12 <li><a href="<%RT->Config->Get('WebPath')%>/m/ticket/create?Queue=<%$q->id%>"><%$q->Name%></a></li>
13 % }
14 </ul>
15 </&>
16 </div>
17 </&>
18