summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--Presence/AdaptServer.hs1
-rw-r--r--Presence/ConfigFiles.hs1
-rw-r--r--Presence/GetHostByAddr.hs1
-rw-r--r--Presence/XMPPServer.hs2
-rw-r--r--Presence/main.hs1
5 files changed, 0 insertions, 6 deletions
diff --git a/Presence/AdaptServer.hs b/Presence/AdaptServer.hs
index dd453ba9..e4940331 100644
--- a/Presence/AdaptServer.hs
+++ b/Presence/AdaptServer.hs
@@ -3,7 +3,6 @@
3module AdaptServer where 3module AdaptServer where
4 4
5import Data.IORef 5import Data.IORef
6import Debug.Trace
7import Data.HList 6import Data.HList
8-- import Network.Socket (Socket) 7-- import Network.Socket (Socket)
9import qualified Data.ByteString.Lazy.Char8 as L 8import qualified Data.ByteString.Lazy.Char8 as L
diff --git a/Presence/ConfigFiles.hs b/Presence/ConfigFiles.hs
index 48049c08..6d36f4cd 100644
--- a/Presence/ConfigFiles.hs
+++ b/Presence/ConfigFiles.hs
@@ -10,7 +10,6 @@ import System.IO
10import System.IO.Error 10import System.IO.Error
11import Control.Exception 11import Control.Exception
12import Control.Monad 12import Control.Monad
13import Todo
14import Control.DeepSeq 13import Control.DeepSeq
15import ByteStringOperators() -- For NFData instance 14import ByteStringOperators() -- For NFData instance
16 15
diff --git a/Presence/GetHostByAddr.hs b/Presence/GetHostByAddr.hs
index fd01108d..a451f088 100644
--- a/Presence/GetHostByAddr.hs
+++ b/Presence/GetHostByAddr.hs
@@ -14,7 +14,6 @@ import System.IO.Unsafe
14import System.IO.Error (ioeSetErrorString, mkIOError) 14import System.IO.Error (ioeSetErrorString, mkIOError)
15import Network.Socket 15import Network.Socket
16import GHC.IO.Exception 16import GHC.IO.Exception
17import Network.Socket.Internal
18 17
19 18
20throwNoSuchThingIfNull :: String -> String -> IO (Ptr a) -> IO (Ptr a) 19throwNoSuchThingIfNull :: String -> String -> IO (Ptr a) -> IO (Ptr a)
diff --git a/Presence/XMPPServer.hs b/Presence/XMPPServer.hs
index 892cc177..7ed16f6b 100644
--- a/Presence/XMPPServer.hs
+++ b/Presence/XMPPServer.hs
@@ -7,7 +7,6 @@
7module XMPPServer where -- ( listenForXmppClients ) where 7module XMPPServer where -- ( listenForXmppClients ) where
8 8
9import Data.Char (isSpace) 9import Data.Char (isSpace)
10import Todo
11import Data.HList.TypeEqGeneric1() 10import Data.HList.TypeEqGeneric1()
12import Data.HList.TypeCastGeneric1() 11import Data.HList.TypeCastGeneric1()
13import ByteStringOperators 12import ByteStringOperators
@@ -47,7 +46,6 @@ import Text.PrettyPrint
47import Data.Maybe 46import Data.Maybe
48import Debug.Trace 47import Debug.Trace
49import Control.Arrow 48import Control.Arrow
50import LocalPeerCred
51import Network.Socket 49import Network.Socket
52import Data.String 50import Data.String
53import Control.Monad.Trans.Maybe 51import Control.Monad.Trans.Maybe
diff --git a/Presence/main.hs b/Presence/main.hs
index 08943b08..74589a41 100644
--- a/Presence/main.hs
+++ b/Presence/main.hs
@@ -3,7 +3,6 @@
3{-# LANGUAGE TypeFamilies #-} 3{-# LANGUAGE TypeFamilies #-}
4module Main where 4module Main where
5 5
6import Debug.Trace
7import System.Directory 6import System.Directory
8import Control.Monad 7import Control.Monad
9import System.Posix.Signals 8import System.Posix.Signals