</> is better than +/+

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

diff --git a/Network/HTTP/Lucu.hs b/Network/HTTP/Lucu.hs
index 3f4350bc35004b8a23066616b232914fdcfcb943..6f6e4d92f546f4e8b8e14d5280cdd174a80d9011 100644 (file)
--- 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