It (at least) builds now...

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

diff --git a/Network/HTTP/Lucu.hs b/Network/HTTP/Lucu.hs
index 7496e5c9bc84202122c4742537cc5b59993d6fca..849f97ec7b258d292de8ee199bfe4f1885c7b46a 100644 (file)
--- a/Network/HTTP/Lucu.hs
+++ b/Network/HTTP/Lucu.hs
@@ -35,12 +35,13 @@ module Network.HTTP.Lucu
       -- * 'Config'uration
     , module Network.HTTP.Lucu.Config
 
-      -- * 'Dispatcher'
-    , module Network.HTTP.Lucu.Resource.Dispatcher
+      -- * URI-related data types
+    , Scheme
+    , Host
+    , PathSegments
 
-      -- ** 'Resource' Tree
-    , ResTree
-    , mkResTree
+      -- * 'Resource' dispatcher
+    , module Network.HTTP.Lucu.Dispatcher
 
       -- * 'Rsrc' Monad
     , module Network.HTTP.Lucu.Resource
@@ -76,14 +77,14 @@ module Network.HTTP.Lucu
 import Network.HTTP.Lucu.Abortion
 import Network.HTTP.Lucu.Authentication
 import Network.HTTP.Lucu.Config
+import Network.HTTP.Lucu.Dispatcher
 import Network.HTTP.Lucu.ETag
 import Network.HTTP.Lucu.Httpd
 import Network.HTTP.Lucu.MIMEParams
 import Network.HTTP.Lucu.MIMEType hiding (mimeType)
 import Network.HTTP.Lucu.MIMEType.TH
 import Network.HTTP.Lucu.Resource
-import Network.HTTP.Lucu.Resource.Dispatcher
-import Network.HTTP.Lucu.Resource.Tree
 import Network.HTTP.Lucu.Response
 import Network.HTTP.Lucu.StaticFile
 import Network.HTTP.Lucu.StatusCode
+import Network.HTTP.Lucu.Utils