X-Git-Url: http://git.cielonegro.org/gitweb.cgi?a=blobdiff_plain;f=Network%2FHTTP%2FLucu%2FStaticFile.hs;h=ffda4cf8dbbbc0a6f0bb41b9536dfb30ec2d2d1c;hb=4e41b11;hp=90cdcb0fa22d65d12e8ce1f08c6940551a142f6c;hpb=5e561403ba8ad9c440cc2bf2bacb61ebc3c7a111;p=Lucu.git

diff --git a/Network/HTTP/Lucu/StaticFile.hs b/Network/HTTP/Lucu/StaticFile.hs
index 90cdcb0..ffda4cf 100644
--- a/Network/HTTP/Lucu/StaticFile.hs
+++ b/Network/HTTP/Lucu/StaticFile.hs
@@ -66,6 +66,7 @@ handleStaticFile sendContent path
              $ abort
              $ mkAbortion Forbidden [] Nothing
 
+         -- FIXME: Forget about ETags of a static file.
          tag  ← liftIO $ generateETagFromFile path
          let lastMod = posixSecondsToUTCTime
                        $ fromRational