diff --git a/Network/Wai/Application/Classic.hs b/Network/Wai/Application/Classic.hs
--- a/Network/Wai/Application/Classic.hs
+++ b/Network/Wai/Application/Classic.hs
@@ -5,8 +5,6 @@
 module Network.Wai.Application.Classic (
   -- * Types
     AppSpec(..)
-  , RspBody(..)
-  , Range(..)
   -- * Files
   , FileRoute(..), fileApp
   -- * CGI
diff --git a/Network/Wai/Application/Classic/CGI.hs b/Network/Wai/Application/Classic/CGI.hs
--- a/Network/Wai/Application/Classic/CGI.hs
+++ b/Network/Wai/Application/Classic/CGI.hs
@@ -37,7 +37,7 @@
 {-|
   Handle GET and POST for CGI.
 
-The program to link this library must ignore SIGCHLD as follow:
+The program to link this library must ignore SIGCHLD as follows:
 
 >   installHandler sigCHLD Ignore Nothing
 -}
diff --git a/Network/Wai/Application/Classic/Header.hs b/Network/Wai/Application/Classic/Header.hs
--- a/Network/Wai/Application/Classic/Header.hs
+++ b/Network/Wai/Application/Classic/Header.hs
@@ -11,6 +11,7 @@
 
 ----------------------------------------------------------------
 
+-- | Header field key. This must be lower case.
 type FieldKey = ByteString
 
 -- | A type for look-up key.
diff --git a/Network/Wai/Application/Classic/Types.hs b/Network/Wai/Application/Classic/Types.hs
--- a/Network/Wai/Application/Classic/Types.hs
+++ b/Network/Wai/Application/Classic/Types.hs
@@ -12,7 +12,7 @@
   , indexFile :: ByteString
     -- | Whether this is an HTML or not.
   , isHTML :: ByteString -> Bool
-    -- | A function for logging.
+    -- | A function for logging. The third argument is a body size.
   , logger :: Request -> Status -> Maybe Integer -> IO ()
   }
 
diff --git a/wai-app-file-cgi.cabal b/wai-app-file-cgi.cabal
--- a/wai-app-file-cgi.cabal
+++ b/wai-app-file-cgi.cabal
@@ -1,5 +1,5 @@
 Name:                   wai-app-file-cgi
-Version:                0.2.1
+Version:                0.2.2
 Author:                 Kazu Yamamoto <kazu@iij.ad.jp>
 Maintainer:             Kazu Yamamoto <kazu@iij.ad.jp>
 License:                BSD3