Change log level of missing LAST_PARSED.tmp file to WARNING and add a HINT.

diff --git a/pgbadger b/pgbadger
index 414f7e8036102483139e621d11a46cb7dff9bcee..d9817880aa80a2b5ea71d7ec3b649492d700c206 100755 (executable)
--- a/pgbadger
+++ b/pgbadger
@@ -926,7 +926,8 @@ if (!$incremental) {
                close(IN);
                unlink("$last_parsed.tmp");
        } else {
-               &logmsg('ERROR', "can't read file $last_parsed.tmp, $!");
+               &logmsg('WARNING', "can't read file $last_parsed.tmp, $!");
+               &logmsg('HINT', "maybe there's no new entries in your log since last run.");
        }
        foreach $incr_date (@build_directories) {
                $last_incr_date = $incr_date;
@@ -3530,8 +3531,8 @@ sub compute_query_graphs
                                                                        $a_dataavg{write}{duration}{"$rd"} += ($per_minute_info{$tm}{$h}{$m}{$action}{duration} || 0);
                                                                }
                                                                # Search minimum and maximum during this minute
-                                                               $a_dataavg{$action}{max}{"$rd"} = 0 if (!$a_dataavg{$action}{max}{"$rd"});
-                                                               $a_dataavg{$action}{min}{"$rd"} = 0 if (!$a_dataavg{$action}{min}{"$rd"});
+                                                               $a_dataavg{$action}{max}{"$rd"} = 0 if (! exists $a_dataavg{$action}{max}{"$rd"});
+                                                               $a_dataavg{$action}{min}{"$rd"} = 0 if (! exists $a_dataavg{$action}{min}{"$rd"});
                                                                foreach my $s (keys %{$per_minute_info{$tm}{$h}{$m}{$action}{second}}) {
                                                                        $a_dataavg{$action}{max}{"$rd"} = $per_minute_info{$tm}{$h}{$m}{$action}{second}{$s}
                                                                                if ($per_minute_info{$tm}{$h}{$m}{$action}{second}{$s} > $a_dataavg{$action}{max}{"$rd"});
@@ -3611,7 +3612,7 @@ sub compute_query_graphs
                                                # Mini connections per minute
                                                $graph_data{sess_min} .= "[$t, " . ($s_dataavg{min}{"$rd"} || 0) . "],";
                                        }
-                                       if (!$disable_query && (scalar keys %a_dataavg> 0)) { 
+                                       if (!$disable_query && (scalar keys %a_dataavg > 0)) { 
                                                foreach my $action (@SQL_ACTION) {
                                                        next if ($select_only && ($action ne 'SELECT'));