Author: spadkins
Date: Wed Feb 13 13:33:16 2008
New Revision: 10730
Modified:
p5ee/trunk/App-Context/lib/App/Context.pm
Log:
small change to initialize the _last_log_elapsed_time so that the first
log message has a 0 elapsed time instead of some random number
Modified: p5ee/trunk/App-Context/lib/App/Context.pm
==============================================================================
--- p5ee/trunk/App-Context/lib/App/Context.pm (original)
+++ p5ee/trunk/App-Context/lib/App/Context.pm Wed Feb 13 13:33:16 2008
@[EMAIL PROTECTED]
-1585,6 +1585,9 @[EMAIL PROTECTED]
my @[EMAIL PROTECTED]
= Time::HiRes::gettimeofday();
$timestamp = time2str("%Y-%m-%d %H:%M:%S.", $timestuff[0]) .
sprintf("%06d", $timestuff[1]);
if ($elapsed) {
+ if (!defined($self->{_last_log_elapsed_time})) {
+ $self->{_last_log_elapsed_time} = \@[EMAIL PROTECTED]
}
my $elapsed =
Time::HiRes::tv_interval($self->{_last_log_elapsed_time}, \@[EMAIL PROTECTED]
);
$timestamp .= " " . sprintf("%.6f", $elapsed);
$self->{_last_log_elapsed_time} = \@[EMAIL PROTECTED]
