Changeset 1483
- Timestamp:
- 11/10/15 18:57:54 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/LATMOS-Accounts-Web/lib/LATMOS/Accounts/Web/Controller/Json/AccAge.pm
r1482 r1483 41 41 $_ =~ s/-.*//; 42 42 my $status = $exists{$user} ? 'active' : 'inactive'; 43 $dates{$status}{$_} ||= 0; 43 $dates{active}{$_} ||= 0; 44 $dates{inactive}{$_} ||= 0; 44 45 $dates{$status}{$_} ++; 45 46 } 46 47 } 47 48 48 foreach my $status ( sort keys %dates) {49 push(@{ $graph->{data} }, [ map { [ $_, $dates{$status}{$_} +0 ] } sort { $ dates{$status}{$b} <=> $dates{$status}{$a}} keys %{ $dates{$status} } ]);49 foreach my $status ('active', 'inactive') { 50 push(@{ $graph->{data} }, [ map { [ $_, $dates{$status}{$_} +0 ] } sort { $a cmp $b } keys %{ $dates{$status} } ]); 50 51 push(@{ $graph->{series} }, { label => $status }); 51 52 }
Note: See TracChangeset
for help on using the changeset viewer.