diff options
-rw-r--r-- | DHTHandlers.hs | 2 | ||||
-rw-r--r-- | Mainline.hs | 2 | ||||
-rw-r--r-- | Tox.hs | 2 | ||||
-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 | |||
12 | import Network.Kademlia | 12 | import Network.Kademlia |
13 | import Network.Address (WantIP (..), ipFamily, testIdBit,fromSockAddr, sockAddrPort) | 13 | import Network.Address (WantIP (..), ipFamily, testIdBit,fromSockAddr, sockAddrPort) |
14 | import qualified Network.DHT.Routing as R | 14 | import qualified Network.DHT.Routing as R |
15 | import TriadCommittee | 15 | import Control.TriadCommittee |
16 | import System.Global6 | 16 | import System.Global6 |
17 | 17 | ||
18 | import qualified Data.ByteArray as BA | 18 | import 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, (.=)) |
80 | import Text.Read | 80 | import Text.Read |
81 | import System.Global6 | 81 | import System.Global6 |
82 | import TriadCommittee | 82 | import Control.TriadCommittee |
83 | 83 | ||
84 | newtype NodeId = NodeId ByteString | 84 | newtype NodeId = NodeId ByteString |
85 | deriving (Eq,Ord,ByteArrayAccess, Bits, Hashable) | 85 | deriving (Eq,Ord,ByteArrayAccess, Bits, Hashable) |
@@ -79,7 +79,7 @@ import System.IO | |||
79 | import qualified Text.ParserCombinators.ReadP as RP | 79 | import qualified Text.ParserCombinators.ReadP as RP |
80 | import Text.Printf | 80 | import Text.Printf |
81 | import Text.Read | 81 | import Text.Read |
82 | import TriadCommittee | 82 | import Control.TriadCommittee |
83 | import Network.BitTorrent.DHT.Token as Token | 83 | import Network.BitTorrent.DHT.Token as Token |
84 | import GHC.TypeLits | 84 | import 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 #-} |
2 | module TriadCommittee where | 2 | module Control.TriadCommittee where |
3 | 3 | ||
4 | import Control.Concurrent.STM | 4 | import Control.Concurrent.STM |
5 | import Control.Monad | 5 | import Control.Monad |