Fix number of event samples displayed in event reports.

diff --git a/pgbadger b/pgbadger
index e3a56b16cbeb3dd73e7ffe00a0d72bff80ed7d12..fd85f504ec8ef70bcb6be1807f720f6b2bfca427 100755 (executable)
--- a/pgbadger
+++ b/pgbadger
@@ -9014,6 +9014,7 @@ sub show_error_as_html
 };
 
                for (my $i = 0 ; $i <= $#{$error_info{$k}{date}} ; $i++) {
+                       last if (($sample > 0) && ($i == $sample));
                        # Escape HTML code in error message
                        my $message = &escape_html($error_info{$k}{error}[$i]);
                        my $details = "Date: " . $error_info{$k}{date}[$i] . "\n";