summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--DHTHandlers.hs2
-rw-r--r--Mainline.hs2
-rw-r--r--Tox.hs2
-rw-r--r--src/Control/TriadCommittee.hs (renamed from TriadCommittee.hs)2
4 files changed, 4 insertions, 4 deletions
diff --git a/DHTHandlers.hs b/DHTHandlers.hs
index ba5ee295..1cc4cf83 100644
--- a/DHTHandlers.hs
+++ b/DHTHandlers.hs
@@ -12,7 +12,7 @@ import qualified Data.Wrapper.PSQInt as Int
12import Network.Kademlia 12import Network.Kademlia
13import Network.Address (WantIP (..), ipFamily, testIdBit,fromSockAddr, sockAddrPort) 13import Network.Address (WantIP (..), ipFamily, testIdBit,fromSockAddr, sockAddrPort)
14import qualified Network.DHT.Routing as R 14import qualified Network.DHT.Routing as R
15import TriadCommittee 15import Control.TriadCommittee
16import System.Global6 16import System.Global6
17 17
18import qualified Data.ByteArray as BA 18import qualified Data.ByteArray as BA
diff --git a/Mainline.hs b/Mainline.hs
index be9248ce..b6f99487 100644
--- a/Mainline.hs
+++ b/Mainline.hs
@@ -79,7 +79,7 @@ import qualified Data.Aeson as JSON
79 ;import Data.Aeson (FromJSON, ToJSON, (.=)) 79 ;import Data.Aeson (FromJSON, ToJSON, (.=))
80import Text.Read 80import Text.Read
81import System.Global6 81import System.Global6
82import TriadCommittee 82import Control.TriadCommittee
83 83
84newtype NodeId = NodeId ByteString 84newtype NodeId = NodeId ByteString
85 deriving (Eq,Ord,ByteArrayAccess, Bits, Hashable) 85 deriving (Eq,Ord,ByteArrayAccess, Bits, Hashable)
diff --git a/Tox.hs b/Tox.hs
index 802c466d..7ba0d63e 100644
--- a/Tox.hs
+++ b/Tox.hs
@@ -79,7 +79,7 @@ import System.IO
79import qualified Text.ParserCombinators.ReadP as RP 79import qualified Text.ParserCombinators.ReadP as RP
80import Text.Printf 80import Text.Printf
81import Text.Read 81import Text.Read
82import TriadCommittee 82import Control.TriadCommittee
83import Network.BitTorrent.DHT.Token as Token 83import Network.BitTorrent.DHT.Token as Token
84import GHC.TypeLits 84import GHC.TypeLits
85 85
diff --git a/TriadCommittee.hs b/src/Control/TriadCommittee.hs
index 3e5a710a..88e665b6 100644
--- a/TriadCommittee.hs
+++ b/src/Control/TriadCommittee.hs
@@ -1,5 +1,5 @@
1{-# LANGUAGE TupleSections #-} 1{-# LANGUAGE TupleSections #-}
2module TriadCommittee where 2module Control.TriadCommittee where
3 3
4import Control.Concurrent.STM 4import Control.Concurrent.STM
5import Control.Monad 5import Control.Monad