From 43a06151e47d2c59b833cbd8c26d97865ee850b6 Mon Sep 17 00:00:00 2001 From: Ivan Kohler Date: Thu, 7 Jun 2012 00:56:06 -0700 Subject: starting to work... --- rt/share/html/Elements/SelectQueue | 36 +++++++++++++++++++++--------------- 1 file changed, 21 insertions(+), 15 deletions(-) (limited to 'rt/share/html/Elements/SelectQueue') diff --git a/rt/share/html/Elements/SelectQueue b/rt/share/html/Elements/SelectQueue index 0cfdd915d..b0a191a7e 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-2012 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,18 @@ 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; - + while (my $queue = $q->Next) { if ($ShowAllQueues || $queue->CurrentUserHasRight($CheckQueueRight)) { push @{$session{$cache_key}{queues}}, { -- cgit v1.2.1