diff --git a/cgi-utils.cabal b/cgi-utils.cabal
--- a/cgi-utils.cabal
+++ b/cgi-utils.cabal
@@ -1,5 +1,5 @@
 Name: cgi-utils
-Version: 0.2
+Version: 0.2.1
 Maintainer: Chris Done (chrisdone@gmail.com)
 Author: Chris Done (chrisdone@gmail.com)
 Copyright: 2010 Chris Done
@@ -15,6 +15,6 @@
 Library
   Exposed-Modules: Network.CGI.Session
   Hs-Source-Dirs: src
-  Build-Depends: base >= 2 && < 4, cgi, random, containers, mtl
+  Build-Depends: base >= 2 && < 5, cgi, random, containers, mtl
   Extensions: TypeSynonymInstances
   GHC-Options: -Wall
diff --git a/src/Network/CGI/Session.hs b/src/Network/CGI/Session.hs
--- a/src/Network/CGI/Session.hs
+++ b/src/Network/CGI/Session.hs
@@ -1,3 +1,18 @@
+-- | Example usage:
+--
+-- > module Main where
+-- > 
+-- > import Data.Maybe
+-- > import Network.CGI
+-- > import Network.CGI.Session
+-- > import Network.FastCGI
+-- > 
+-- > main = do
+-- >   runSessionCGI "myapp" runFastCGI $ do
+-- >     n <- fmap (fromMaybe 0) $ sessionGet "age"
+-- >     sessionIns "age" 1 (+)
+-- >     output $ show n ++ " visits to this page."
+
 module Network.CGI.Session 
     (-- * Types
      Session(..)
@@ -111,7 +126,7 @@
 betterStdGen :: IO StdGen
 betterStdGen = alloca $ \p -> do
     h <- openBinaryFile "/dev/urandom" ReadMode
-    hGetBuf h p $ sizeOf (undefined :: Int)
+    _ <- hGetBuf h p $ sizeOf (undefined :: Int)
     hClose h
     mkStdGen <$> peek p