Defined Graylog type to contain connection informaiton.

[github/fretlink/haskell-graylog.git] / src / Graylog / UDP.hs

diff --git a/src/Graylog/UDP.hs b/src/Graylog/UDP.hs
index 6aec108e111bdfe164e451e253d0886ef747a7d9..00b6a1244d395004b35d0647a189d4930e10b803 100644 (file)
--- a/src/Graylog/UDP.hs
+++ b/src/Graylog/UDP.hs
@@ -2,18 +2,12 @@ module Graylog.UDP
    ( Graylog (..)
    , sendLog
 
-   , module Graylog.Gelf
+   , module Export
    ) where
 
-import           Network.Socket
-
-import           Graylog.Gelf
-
-data Graylog
-   = Graylog
-      { _graylogHost :: String
-      , _graylogPort :: String
-      }
+import           Graylog.Gelf  as Export
+import           Graylog.Types as Export
 
 sendLog :: Graylog -> GELF -> IO ()
 sendLog glog msg = undefined
+