From 386784d5b3e3accd02941d3757398e7bf34a37b6 Mon Sep 17 00:00:00 2001
From: Ben <im_dev@barracuda.com>
Date: Thu, 4 Mar 2010 19:35:51 +0000
Subject: [PATCH] Restart connection_started_at tracking if it is lost before
 the conflict occurs.

---
 perl/lib/Thrasher/Protocol/Purple.pm | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/perl/lib/Thrasher/Protocol/Purple.pm b/perl/lib/Thrasher/Protocol/Purple.pm
index 6fc697d..48418bb 100644
--- a/perl/lib/Thrasher/Protocol/Purple.pm
+++ b/perl/lib/Thrasher/Protocol/Purple.pm
@@ -606,6 +606,9 @@ sub create_login_session {
         # what if credentials differ? Or if libpurple never finishes?
         $continuation->('conflict', 1);
         $component->logout($session);
+        if (not $self->{'connection_started_at'}->{$jid}) {
+            $self->{'connection_started_at'}->{$jid} = time();
+        }
         return;
     }
 
-- 
2.11.4.GIT