From 110ffba56f4f025e4609328e4e688d41c10a9d0f Mon Sep 17 00:00:00 2001 From: tmu Date: Sat, 4 Jan 2003 13:26:33 +0000 Subject: bugfix missing my at day check values --- fml/lib/FML/Error/Analyze.pm | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/fml/lib/FML/Error/Analyze.pm b/fml/lib/FML/Error/Analyze.pm index 29a629c9..59c9f2b3 100644 --- a/fml/lib/FML/Error/Analyze.pm +++ b/fml/lib/FML/Error/Analyze.pm @@ -4,7 +4,7 @@ # All rights reserved. This program is free software; you can # redistribute it and/or modify it under the same terms as Perl itself. # -# $FML: Analyze.pm,v 1.12 2003/01/04 12:55:53 tmu Exp $ +# $FML: Analyze.pm,v 1.13 2003/01/04 13:09:17 tmu Exp $ # package FML::Error::Analyze; @@ -73,6 +73,7 @@ sub simple_count { my ($self, $curproc, $data) = @_; my ($addr, $bufarray, $count); + my ($time, $status, $reason); my @removelist = (); my $summary = {}; my $config = $curproc->config(); @@ -120,6 +121,7 @@ sub simple_count2 { my ($self, $curproc, $data) = @_; my ($addr, $bufarray, $count); + my ($time, $status, $reason); my @removelist = (); my $summary = {}; my $config = $curproc->config(); -- cgit v1.2.1