From a45b000e07a806e171f1e4701abd3e025382ecf3 Mon Sep 17 00:00:00 2001
From: joe <joe@jerkface.net>
Date: Mon, 18 Jun 2018 13:32:02 -0400
Subject: Factored separate code-paths for Kademlia announce versus action on
 search result.

---
 ToxManager.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'ToxManager.hs')

diff --git a/ToxManager.hs b/ToxManager.hs
index af1911d4..1e9c618d 100644
--- a/ToxManager.hs
+++ b/ToxManager.hs
@@ -81,10 +81,10 @@ toxman announcer toxbkts tox presence = ToxManager
             -- Schedule recurring announce.
             --
             akey <- atomically $ packAnnounceKey announcer $ "toxid:" ++ show pubid
-            schedule announcer
+            scheduleAnnounce announcer
                      akey
                      (AnnounceMethod (toxQSearch tox)
-                                     (Right $ toxAnnounceSendData tox)
+                                     (toxAnnounceSendData tox)
                                      nearNodes
                                      pubid
                                      toxAnnounceInterval)
-- 
cgit v1.2.3