diff options
Diffstat (limited to 'Presence')
-rw-r--r-- | Presence/AdaptServer.hs | 1 | ||||
-rw-r--r-- | Presence/ConfigFiles.hs | 1 | ||||
-rw-r--r-- | Presence/GetHostByAddr.hs | 1 | ||||
-rw-r--r-- | Presence/XMPPServer.hs | 2 | ||||
-rw-r--r-- | Presence/main.hs | 1 |
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 @@ | |||
3 | module AdaptServer where | 3 | module AdaptServer where |
4 | 4 | ||
5 | import Data.IORef | 5 | import Data.IORef |
6 | import Debug.Trace | ||
7 | import Data.HList | 6 | import Data.HList |
8 | -- import Network.Socket (Socket) | 7 | -- import Network.Socket (Socket) |
9 | import qualified Data.ByteString.Lazy.Char8 as L | 8 | import 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 | |||
10 | import System.IO.Error | 10 | import System.IO.Error |
11 | import Control.Exception | 11 | import Control.Exception |
12 | import Control.Monad | 12 | import Control.Monad |
13 | import Todo | ||
14 | import Control.DeepSeq | 13 | import Control.DeepSeq |
15 | import ByteStringOperators() -- For NFData instance | 14 | import 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 | |||
14 | import System.IO.Error (ioeSetErrorString, mkIOError) | 14 | import System.IO.Error (ioeSetErrorString, mkIOError) |
15 | import Network.Socket | 15 | import Network.Socket |
16 | import GHC.IO.Exception | 16 | import GHC.IO.Exception |
17 | import Network.Socket.Internal | ||
18 | 17 | ||
19 | 18 | ||
20 | throwNoSuchThingIfNull :: String -> String -> IO (Ptr a) -> IO (Ptr a) | 19 | throwNoSuchThingIfNull :: 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 @@ | |||
7 | module XMPPServer where -- ( listenForXmppClients ) where | 7 | module XMPPServer where -- ( listenForXmppClients ) where |
8 | 8 | ||
9 | import Data.Char (isSpace) | 9 | import Data.Char (isSpace) |
10 | import Todo | ||
11 | import Data.HList.TypeEqGeneric1() | 10 | import Data.HList.TypeEqGeneric1() |
12 | import Data.HList.TypeCastGeneric1() | 11 | import Data.HList.TypeCastGeneric1() |
13 | import ByteStringOperators | 12 | import ByteStringOperators |
@@ -47,7 +46,6 @@ import Text.PrettyPrint | |||
47 | import Data.Maybe | 46 | import Data.Maybe |
48 | import Debug.Trace | 47 | import Debug.Trace |
49 | import Control.Arrow | 48 | import Control.Arrow |
50 | import LocalPeerCred | ||
51 | import Network.Socket | 49 | import Network.Socket |
52 | import Data.String | 50 | import Data.String |
53 | import Control.Monad.Trans.Maybe | 51 | import 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 #-} |
4 | module Main where | 4 | module Main where |
5 | 5 | ||
6 | import Debug.Trace | ||
7 | import System.Directory | 6 | import System.Directory |
8 | import Control.Monad | 7 | import Control.Monad |
9 | import System.Posix.Signals | 8 | import System.Posix.Signals |