summaryrefslogtreecommitdiff
path: root/Presence
diff options
context:
space:
mode:
authorJames Crayne <jim.crayne@gmail.com>2018-11-04 03:25:21 -0500
committerJames Crayne <jim.crayne@gmail.com>2018-11-04 03:25:21 -0500
commit5f5aa818f8484570349e75a061d7b37cc9fe826a (patch)
tree9a574cc572d2caa4af9571a4776d207250e93add /Presence
parentdf787ee7eea3d0d6e0defdc4a7cbe646ca062feb (diff)
Preparation to move DPut to a separate project.
Diffstat (limited to 'Presence')
-rw-r--r--Presence/ConfigFiles.hs1
-rw-r--r--Presence/ConsoleWriter.hs1
-rw-r--r--Presence/DNSCache.hs1
-rw-r--r--Presence/Presence.hs1
-rw-r--r--Presence/XMPPServer.hs1
5 files changed, 5 insertions, 0 deletions
diff --git a/Presence/ConfigFiles.hs b/Presence/ConfigFiles.hs
index 27a65bbf..d0164e33 100644
--- a/Presence/ConfigFiles.hs
+++ b/Presence/ConfigFiles.hs
@@ -17,6 +17,7 @@ import Data.List (partition)
17import Data.Maybe (catMaybes,isJust) 17import Data.Maybe (catMaybes,isJust)
18 18
19import DPut 19import DPut
20import DebugTag
20 21
21type User = ByteString 22type User = ByteString
22type Profile = String 23type Profile = String
diff --git a/Presence/ConsoleWriter.hs b/Presence/ConsoleWriter.hs
index 7c377d83..c6e1871a 100644
--- a/Presence/ConsoleWriter.hs
+++ b/Presence/ConsoleWriter.hs
@@ -36,6 +36,7 @@ import qualified Data.Text as Text
36import qualified Network.BSD as BSD 36import qualified Network.BSD as BSD
37 37
38import DPut 38import DPut
39import DebugTag
39import UTmp ( users2, utmp_file, UtmpRecord(..), UT_Type(..) ) 40import UTmp ( users2, utmp_file, UtmpRecord(..), UT_Type(..) )
40import FGConsole ( forkTTYMonitor ) 41import FGConsole ( forkTTYMonitor )
41import XMPPServer ( Stanza, makePresenceStanza, JabberShow(..), stanzaType 42import XMPPServer ( Stanza, makePresenceStanza, JabberShow(..), stanzaType
diff --git a/Presence/DNSCache.hs b/Presence/DNSCache.hs
index c5154e34..e28655c5 100644
--- a/Presence/DNSCache.hs
+++ b/Presence/DNSCache.hs
@@ -53,6 +53,7 @@ import ControlMaybe ( handleIO_ )
53import GetHostByAddr ( getHostByAddr ) 53import GetHostByAddr ( getHostByAddr )
54import InterruptibleDelay 54import InterruptibleDelay
55import DPut 55import DPut
56import DebugTag
56 57
57type TimeStamp = UTCTime 58type TimeStamp = UTCTime
58 59
diff --git a/Presence/Presence.hs b/Presence/Presence.hs
index cc3f488b..0ae9653f 100644
--- a/Presence/Presence.hs
+++ b/Presence/Presence.hs
@@ -53,6 +53,7 @@ import qualified Connection
53import Network.Tox.NodeId (key2id,parseNoSpamId,nospam64,NoSpamId(..),ToxProgress,ToxContact(..)) 53import Network.Tox.NodeId (key2id,parseNoSpamId,nospam64,NoSpamId(..),ToxProgress,ToxContact(..))
54import Crypto.Tox (decodeSecret) 54import Crypto.Tox (decodeSecret)
55import DPut 55import DPut
56import DebugTag
56 57
57{- 58{-
58isPeerKey :: ClientAddress -> Bool 59isPeerKey :: ClientAddress -> Bool
diff --git a/Presence/XMPPServer.hs b/Presence/XMPPServer.hs
index 2345cb67..42425c5e 100644
--- a/Presence/XMPPServer.hs
+++ b/Presence/XMPPServer.hs
@@ -105,6 +105,7 @@ import Data.String ( IsString(..) )
105import qualified System.Random 105import qualified System.Random
106import Data.Void (Void) 106import Data.Void (Void)
107import DPut 107import DPut
108import DebugTag
108 109
109-- peerport :: PortNumber 110-- peerport :: PortNumber
110-- peerport = 5269 111-- peerport = 5269