[svn:modperl-modules] rev 183 - Apache-VMonitor-2.0/trunk/lib/Apache

Author: stas
Date: Fri Mar 18 12:25:18 2005
New Revision: 183

Modified:
   Apache-VMonitor-2.0/trunk/lib/Apache/VMonitor.pm
Log:
don't clobber $start_usec, as it's used later


Modified: Apache-VMonitor-2.0/trunk/lib/Apache/VMonitor.pm
==============================================================================
--- Apache-VMonitor-2.0/trunk/lib/Apache/VMonitor.pm	(original)
+++ Apache-VMonitor-2.0/trunk/lib/Apache/VMonitor.pm	Fri Mar 18 12:25:18 2005
@@ -779,14 +779,14 @@
 
     # get absolute start and stop times in usecs since epoch
     my ($start_sec, $start_usec) = $worker_score->start_time;
-    my $start_usec = $start_sec * 1000000 + $start_usec;
+    my $start = $start_sec * 1000000 + $start_usec;
 
     my($stop_sec, $stop_usec) = $worker_score->stop_time;
-    my $stop_usec = $stop_sec * 1000000 + $stop_usec;
-    warn "time: $start_sec, $start_usec, $stop_sec, $stop_usec\n";
+    my $stop = $stop_sec * 1000000 + $stop_usec;
+    #warn "time: $start_sec, $start_usec, $stop_sec, $stop_usec\n";
 
     # measure running time till now if not idle
-    my $elapsed = $stop_usec < $start_usec
+    my $elapsed = $stop < $start
         ? Time::HiRes::tv_interval([$start_sec, $start_usec],
                                    [Time::HiRes::gettimeofday()])
         : 0;