X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=rt%2Fshare%2Fhtml%2FElements%2FSelectQueue;h=7276af09a2f83bd1bbbcab640ee5837619b7cdca;hb=c5922713bc199600bc8c203155a4016c9d24cbbc;hp=0cfdd915d9eaf005d221f0d662d1d04ff6e48ae2;hpb=01352af8e44b7eb70b2b587ca43ab7ca946f038d;p=freeside.git diff --git a/rt/share/html/Elements/SelectQueue b/rt/share/html/Elements/SelectQueue index 0cfdd915d..7276af09a 100755 --- a/rt/share/html/Elements/SelectQueue +++ b/rt/share/html/Elements/SelectQueue @@ -2,7 +2,7 @@ %# %# COPYRIGHT: %# -%# This software is Copyright (c) 1996-2011 Best Practical Solutions, LLC +%# This software is Copyright (c) 1996-2014 Best Practical Solutions, LLC %# %# %# (Except where explicitly superseded by other copyright notices) @@ -46,29 +46,25 @@ %# %# END BPS TAGGED BLOCK }}} % if ($Lite) { -% my $d = new RT::Queue($session{'CurrentUser'}); +% my $d = RT::Queue->new($session{'CurrentUser'}); % $d->Load($Default); % } % else { - <% ($OnChange) ? 'onchange="'.$OnChange.'"' : '' |n %> class="<%$Class%>"> % if ($ShowNullOption) { - + % } % for my $queue (@{$session{$cache_key}{queues}}) { - + % } % } @@ -79,10 +75,12 @@ $ShowAllQueues => 1 $Name => undef $Verbose => undef $NamedValues => 0 +$DefaultLabel => "-" $Default => 0 $Lite => 0 $OnChange => undef $Multiple => 0 +$Size => 6 $Class => 'select-queue' <%init> @@ -98,10 +96,32 @@ if ( defined $session{$cache_key} && delete $session{$cache_key}; } +if ( defined $session{$cache_key} && ref $session{$cache_key} eq 'ARRAY') { + delete $session{$cache_key}; +} +if ( defined $session{$cache_key} && + $session{$cache_key}{lastupdated} <= RT->System->QueueCacheNeedsUpdate ) { + delete $session{$cache_key}; +} + if ( not defined $session{$cache_key} and not $Lite ) { - my $q = new RT::Queues($session{'CurrentUser'}); + my $q = RT::Queues->new($session{'CurrentUser'}); $q->UnLimit; + if ( $Default ) { + my $d = RT::Queue->new($session{'CurrentUser'}); + $d->Load($Default); + unless ( $d->CurrentUserHasRight('SeeQueue') ) { + if ( $d->id ) { + push @{$session{$cache_key}{queues}}, { + Id => $d->id, + Name => '#' . $d->id, + Description => '#' . $d->id, + }; + } + } + } + while (my $queue = $q->Next) { if ($ShowAllQueues || $queue->CurrentUserHasRight($CheckQueueRight)) { push @{$session{$cache_key}{queues}}, {