Factored separate code-paths for Kademlia announce versus action

on search result.

1 files changed, 2 insertions, 2 deletions

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)