The library compiles again.

[Lucu.git] / Network / HTTP / Lucu.hs

diff --git a/Network/HTTP/Lucu.hs b/Network/HTTP/Lucu.hs
index 52315d6952afdce4e2c0e07600627b8a03dfd8ab..d47854f708997be73e623ca5c572876f7d05293f 100644 (file)
--- a/Network/HTTP/Lucu.hs
+++ b/Network/HTTP/Lucu.hs
@@ -33,8 +33,6 @@
 --   wicked clients. No attacker should be able to cause a
 --   buffer-overflow but can possibly DoS it.
 --
-
-
 module Network.HTTP.Lucu
     ( -- * Entry Point
       runHttpd
@@ -43,8 +41,6 @@ module Network.HTTP.Lucu
     , module Network.HTTP.Lucu.Config
 
       -- * Resource Tree
-    , ResourceDef(..)
-    , emptyResource
     , ResTree
     , mkResTree
 
@@ -65,9 +61,12 @@ module Network.HTTP.Lucu
     , ETag(..)
     , strongETag
     , weakETag
+    , parseETag
 
       -- *** MIME Type
     , MIMEType(..)
+    , mkMIMEType
+    , parseMIMEType
 
       -- *** Authorization
     , AuthChallenge(..)
@@ -79,14 +78,13 @@ module Network.HTTP.Lucu
     , module Network.HTTP.Lucu.StaticFile
     )
     where
-
 import Network.HTTP.Lucu.Abortion
 import Network.HTTP.Lucu.Authorization
 import Network.HTTP.Lucu.Config
 import Network.HTTP.Lucu.ETag
 import Network.HTTP.Lucu.Httpd
 import Network.HTTP.Lucu.MIMEType
-import Network.HTTP.Lucu.Resource hiding (driftTo)
+import Network.HTTP.Lucu.Resource
 import Network.HTTP.Lucu.Resource.Tree
 import Network.HTTP.Lucu.Response
 import Network.HTTP.Lucu.StaticFile