From: Darold Gilles <gilles@darold.net>
Date: Fri, 11 Jul 2014 15:59:41 +0000 (+0200)
Subject: Fix missing database name in samples of top queries reports. Thanks to Thomas Reiss... 
X-Git-Tag: v6.0~27
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=10b8315a0edf8680d0c2b4fffd1c5482f8e702f6;p=pgbadger

Fix missing database name in samples of top queries reports. Thanks to Thomas Reiss for the report.
---

diff --git a/pgbadger b/pgbadger
index 433eaf1..00b8079 100755
--- a/pgbadger
+++ b/pgbadger
@@ -6690,7 +6690,7 @@ sub print_time_consuming
 		foreach my $d (sort {$b <=> $a} keys %{$normalyzed_info{$k}{samples}}) {
 			my $details = "[ <b>Date:</b> $normalyzed_info{$k}{samples}{$d}{date}";
 			$details .= " - <b>Duration:</b> " . &convert_time($d);
-			$details .= " - <b>Database:</b> $normalyzed_info{$k}{samples}{$d}{details}" if ($normalyzed_info{$k}{samples}{$d}{details});
+			$details .= " - <b>Database:</b> $normalyzed_info{$k}{samples}{$d}{db}" if ($normalyzed_info{$k}{samples}{$d}{db});
 			$details .= " - <b>User:</b> $normalyzed_info{$k}{samples}{$d}{user}" if ($normalyzed_info{$k}{samples}{$d}{user});
 			$details .= " - <b>Remote:</b> $normalyzed_info{$k}{samples}{$d}{remote}" if ($normalyzed_info{$k}{samples}{$d}{remote});
 			$details .= " - <b>Application:</b> $normalyzed_info{$k}{samples}{$d}{app}" if ($normalyzed_info{$k}{samples}{$d}{app});
@@ -6850,7 +6850,7 @@ sub print_most_frequent
 		foreach my $d (sort {$b <=> $a} keys %{$normalyzed_info{$k}{samples}}) {
 			my $details = "[ <b>Date:</b> $normalyzed_info{$k}{samples}{$d}{date}";
 			$details .= " - <b>Duration:</b> " . &convert_time($d);
-			$details .= " - <b>Database:</b> $normalyzed_info{$k}{samples}{$d}{details}" if ($normalyzed_info{$k}{samples}{$d}{details});
+			$details .= " - <b>Database:</b> $normalyzed_info{$k}{samples}{$d}{db}" if ($normalyzed_info{$k}{samples}{$d}{db});
 			$details .= " - <b>User:</b> $normalyzed_info{$k}{samples}{$d}{user}" if ($normalyzed_info{$k}{samples}{$d}{user});
 			$details .= " - <b>Remote:</b> $normalyzed_info{$k}{samples}{$d}{remote}" if ($normalyzed_info{$k}{samples}{$d}{remote});
 			$details .= " - <b>Application:</b> $normalyzed_info{$k}{samples}{$d}{app}" if ($normalyzed_info{$k}{samples}{$d}{app});
@@ -7011,7 +7011,7 @@ sub print_slowest_queries
 		foreach my $d (sort {$b <=> $a} keys %{$normalyzed_info{$k}{samples}}) {
 			my $details = "[ <b>Date:</b> $normalyzed_info{$k}{samples}{$d}{date}";
 			$details .= " - <b>Duration:</b> " . &convert_time($d);
-			$details .= " - <b>Database:</b> $normalyzed_info{$k}{samples}{$d}{details}" if ($normalyzed_info{$k}{samples}{$d}{details});
+			$details .= " - <b>Database:</b> $normalyzed_info{$k}{samples}{$d}{db}" if ($normalyzed_info{$k}{samples}{$d}{db});
 			$details .= " - <b>User:</b> $normalyzed_info{$k}{samples}{$d}{user}" if ($normalyzed_info{$k}{samples}{$d}{user});
 			$details .= " - <b>Remote:</b> $normalyzed_info{$k}{samples}{$d}{remote}" if ($normalyzed_info{$k}{samples}{$d}{remote});
 			$details .= " - <b>Application:</b> $normalyzed_info{$k}{samples}{$d}{app}" if ($normalyzed_info{$k}{samples}{$d}{app});