From: Darold <gilles@darold.net>
Date: Wed, 18 Apr 2012 15:07:43 +0000 (+0200)
Subject: Fix sort order of days/hours into hours array
X-Git-Tag: v3.2~263
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=031ab02c30431f2a3768af5c14f50be8a27b33ad;p=pgbadger

Fix sort order of days/hours into hours array
---

diff --git a/pgbadger b/pgbadger
index c9dead1..1c63047 100755
--- a/pgbadger
+++ b/pgbadger
@@ -961,11 +961,11 @@ sub dump_as_html
 	</tr>
 };
 
-	foreach my $d (sort keys %per_hour_info) {
+	foreach my $d (sort {$a <=> $b} keys %per_hour_info) {
 		my $c = 1;
 		$d =~ /^\d{4}(\d{2})(\d{2})$/;
 		my $zday = "$abbr_month{$1} $2";
-		foreach my $h (sort keys %{$per_hour_info{$d}}) {
+		foreach my $h (sort {$a <=> $b} keys %{$per_hour_info{$d}}) {
 			my $colb = $c % 2;
 			$zday = "&nbsp;" if ($c > 1);
 			$per_hour_info{$d}{$h}{average} = $per_hour_info{$d}{$h}{duration} / ($per_hour_info{$d}{$h}{count} || 1);