Merge commit '4969f31e1f' into WebGUI8

This commit is contained in:
Colin Kuskie 2010-06-26 14:37:31 -07:00
commit e5b82bc861
61 changed files with 2199 additions and 521 deletions

View file

@ -294,7 +294,8 @@ sub getJsonStatus {
my %output;
if ($sitename) { #must have entry for each queue
%output = %queues;
foreach my $instance ($self->getInstances) {
INSTANCE: foreach my $instance ($self->getInstances) {
next INSTANCE unless $instance->{sitename} eq $sitename;
my $queue = ucfirst($instance->{status});
push @{$output{$queue}}, [$instance->{workingPriority}, $instance->{instanceId}, $instance];
}