From 12e7ba9e1ad4f1c1928ecbae885b48a24ea8219d Mon Sep 17 00:00:00 2001
From: joe <joe@jerkface.net>
Date: Wed, 30 May 2018 23:26:05 -0400
Subject: Removed useless tvar access.

---
 src/Network/Tox/DHT/Handlers.hs | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

(limited to 'src')

diff --git a/src/Network/Tox/DHT/Handlers.hs b/src/Network/Tox/DHT/Handlers.hs
index 42937b89..e2dc8eba 100644
--- a/src/Network/Tox/DHT/Handlers.hs
+++ b/src/Network/Tox/DHT/Handlers.hs
@@ -219,11 +219,10 @@ getNodesH routing addr (GetNodes nid) = do
 
 createCookie :: TransportCrypto -> NodeInfo -> PublicKey -> IO Cookie
 createCookie crypto ni remoteUserKey = do
-    (n24,sym,us) <- atomically $ do
+    (n24,sym) <- atomically $ do
         n24 <- transportNewNonce crypto
         sym <- transportSymmetric crypto
-        us <- readTVar $ userKeys crypto
-        return (n24,sym,us)
+        return (n24,sym)
     timestamp <- round . (* 1000000) <$> getPOSIXTime
     let dta = encodePlain $ CookieData
             { cookieTime  = timestamp
-- 
cgit v1.2.3