cgi-utils 0.2 → 0.2.1
raw patch · 2 files changed
+18/−3 lines, 2 filesdep ~basePVP: major bump suggested
API removals or changes: PVP suggests a major version bump
Dependency ranges changed: base
API changes (from Hackage documentation)
- Network.CGI.Session: sessionGet :: (Read a) => String -> SessionM (Maybe a)
+ Network.CGI.Session: sessionGet :: Read a => String -> SessionM (Maybe a)
Files
- cgi-utils.cabal +2/−2
- src/Network/CGI/Session.hs +16/−1
cgi-utils.cabal view
@@ -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
src/Network/CGI/Session.hs view
@@ -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