Changeset 1441

Timestamp:

10/31/15 15:32:24 (9 years ago)

Author:

nanardon

Message:

Sort value according last stat

File:

• trunk/LATMOS-Accounts-Web/lib/LATMOS/Accounts/Web/Controller/Json/Stat.pm (modified) (2 diffs)

trunk/LATMOS-Accounts-Web/lib/LATMOS/Accounts/Web/Controller/Json/Stat.pm

@@ -42 +42 @@
 
     my $data = $ostat->getAllStat or return;
+    my $res = $ostat->getStat or return;
 
     my $graph = {
@@ -52 +53 @@
     foreach my $date (sort keys %$data) {
         foreach my $val (sort keys %{ $data->{$date} }) {
+            $res->{ $val } ||= 0;
             push(@{ $lines{$val} }, [ $date, $data->{$date}{$val} + 0 ]);
         }
     }
 
-    foreach (sort keys %lines) {
+    foreach (sort { $res->{$b} <=> $res->{$a} } keys %lines) {
         push(@{ $graph->{data} }, $lines{$_});
         push(@{ $graph->{series} }, { label => $_ });