X-Git-Url: http://git.cielonegro.org/gitweb.cgi?a=blobdiff_plain;f=Network%2FHTTP%2FLucu.hs;h=6f6e4d92f546f4e8b8e14d5280cdd174a80d9011;hb=175e14b3b144537644e65ca76f1fca5c56fd44e9;hp=3f4350bc35004b8a23066616b232914fdcfcb943;hpb=40c0d61e88920807a91b8f3c4419b08032988d76;p=Lucu.git

diff --git a/Network/HTTP/Lucu.hs b/Network/HTTP/Lucu.hs
index 3f4350b..6f6e4d9 100644
--- a/Network/HTTP/Lucu.hs
+++ b/Network/HTTP/Lucu.hs
@@ -4,12 +4,10 @@ module Network.HTTP.Lucu
     , abortA
 
       -- Config
-    , Config(..)
-    , defaultConfig
+    , module Network.HTTP.Lucu.Config
 
       -- ETag
-    , ETag
-    , mkETag
+    , ETag(..)
     , strongETag
     , weakETag
 
@@ -18,15 +16,11 @@ module Network.HTTP.Lucu
 
       -- MIMEType
     , MIMEType(..)
-    , (+/+)
-    , (+:+)
-    , (+=+)
+    , (</>)
+    , (<:>)
+    , (<=>)
     
-      -- Request
-    , Method(..)
-    , Request(..)
-
-      -- Resource (driftTo だけは要らないが)
+      -- Resource (driftTo だけは要らない)
     , module Network.HTTP.Lucu.Resource
 
       -- Resource.Tree
@@ -48,7 +42,7 @@ import Network.HTTP.Lucu.ETag
 import Network.HTTP.Lucu.Httpd
 import Network.HTTP.Lucu.MIMEType
 import Network.HTTP.Lucu.Request
-import Network.HTTP.Lucu.Resource
+import Network.HTTP.Lucu.Resource hiding (driftTo)
 import Network.HTTP.Lucu.Resource.Tree
 import Network.HTTP.Lucu.Response
 import Network.HTTP.Lucu.StaticFile