X-Git-Url: http://git.cielonegro.org/gitweb.cgi?p=Lucu.git;a=blobdiff_plain;f=Network%2FHTTP%2FLucu%2FHeaders.hs;h=e83aa34fdc181022584693abf28578a91b9360b9;hp=97a7603611937c3b16109c4332f743823bf7281c;hb=b495d6b8b7647b719eceef2f3e50d5bf87c430cf;hpb=bb121f1189d01b5089aa5c29f0d390fad36ade48

diff --git a/Network/HTTP/Lucu/Headers.hs b/Network/HTTP/Lucu/Headers.hs
index 97a7603..e83aa34 100644
--- a/Network/HTTP/Lucu/Headers.hs
+++ b/Network/HTTP/Lucu/Headers.hs
@@ -113,6 +113,7 @@ instance Monoid Headers where
     mappend (Headers α) (Headers β)
         = Headers $ insertManySorted β α
 
+-- FIXME: override every methods
 instance Map Headers CIAscii Ascii where
     {-# INLINE lookup #-}
     lookup k (Headers m) = lookup k m