X-Git-Url: http://git.cielonegro.org/gitweb.cgi?p=Lucu.git;a=blobdiff_plain;f=Network%2FHTTP%2FLucu.hs;h=58cb486f0b6832d6abd314c093b7e2b826b0253b;hp=901ae001ed2a6e28d813883fd14401e46a3a3112;hb=b1fac0a;hpb=3eb69879d3b336c7c3e613c0ce4bfb3c67989ff3

diff --git a/Network/HTTP/Lucu.hs b/Network/HTTP/Lucu.hs
index 901ae00..58cb486 100644
--- a/Network/HTTP/Lucu.hs
+++ b/Network/HTTP/Lucu.hs
@@ -5,7 +5,7 @@
 --   [/Affinity for RESTafarians/] Lucu is specifically designed to be
 --   suitable for RESTful applications.
 --
---   [/Full support of HTTP\/1.1/] Lucu supports request pipelining,
+--   [/Full support of HTTP/\//1.1/] Lucu supports request pipelining,
 --   chunked I\/O, ETag comparison and \"100 Continue\".
 --
 --   [/SSL connections/] Lucu can handle HTTP connections over Secure
@@ -57,8 +57,8 @@ module Network.HTTP.Lucu
 
       -- *** MIME Type
     , MIMEType(..)
-    , mkMIMEType
     , parseMIMEType
+    , mimeType
 
       -- *** Authentication
     , AuthChallenge(..)
@@ -74,7 +74,8 @@ import Network.HTTP.Lucu.Authentication
 import Network.HTTP.Lucu.Config
 import Network.HTTP.Lucu.ETag
 import Network.HTTP.Lucu.Httpd
-import Network.HTTP.Lucu.MIMEType
+import Network.HTTP.Lucu.MIMEType hiding (mimeType)
+import Network.HTTP.Lucu.MIMEType.TH
 import Network.HTTP.Lucu.Resource
 import Network.HTTP.Lucu.Resource.Tree
 import Network.HTTP.Lucu.Response