From aa6367d459d9fd7fda79e892064d7453c432e07a Mon Sep 17 00:00:00 2001
From: Colin Kuskie <colink@perldreamer.com>
Date: Fri, 6 Feb 2009 20:29:56 -0800
Subject: [PATCH] Bug fixes: sticky delta time and dropped 1st entry.

Make the delta time interval sticky in the form where the
workflow is launched.  Also, fix a bug where the first line
of data is dropped because the statement handle was read
twice.
---
 lib/WebGUI/PassiveAnalytics/Flow.pm                       | 2 +-
 lib/WebGUI/Workflow/Activity/SummarizePassiveAnalytics.pm | 1 -
 2 files changed, 1 insertion(+), 2 deletions(-)

diff --git a/lib/WebGUI/PassiveAnalytics/Flow.pm b/lib/WebGUI/PassiveAnalytics/Flow.pm
index 143a24b66..c7fbacb4f 100644
--- a/lib/WebGUI/PassiveAnalytics/Flow.pm
+++ b/lib/WebGUI/PassiveAnalytics/Flow.pm
@@ -110,7 +110,7 @@ sub www_editRuleflow {
     );
     $f->integer(
         name      => 'pauseInterval',
-        value     => 300,
+        value     => $session->form->get('pauseInterval') || 300,
         label     => $i18n->get('pause interval'),
         hoverHelp => $i18n->get('pause interval help'),
     );
diff --git a/lib/WebGUI/Workflow/Activity/SummarizePassiveAnalytics.pm b/lib/WebGUI/Workflow/Activity/SummarizePassiveAnalytics.pm
index b99ee1e2d..ff98311a1 100644
--- a/lib/WebGUI/Workflow/Activity/SummarizePassiveAnalytics.pm
+++ b/lib/WebGUI/Workflow/Activity/SummarizePassiveAnalytics.pm
@@ -101,7 +101,6 @@ sub execute {
     else {
         $sth  = $session->db->read($passive);
         my $logLine    = $sth->hashRef();
-        $logLine       = $sth->hashRef();
         $lastUserId    = $logLine->{userId};
         $lastSessionId = $logLine->{sessionId};
         $lastTimeStamp = $logLine->{timeStamp};