scgi 0.2 → 0.2.1
raw patch · 2 files changed
+6/−6 lines, 2 filesdep ~basenew-uploader
Dependency ranges changed: base
Files
- scgi.cabal +3/−3
- src/Network/SCGI.hs +3/−3
scgi.cabal view
@@ -1,12 +1,12 @@ Name: scgi-Version: 0.2+Version: 0.2.1 Stability: provisional Description: This library lets you write SCGI programs. This package reuses the cgi package API, making it very easy to port CGI programs to SCGI. License: GPL License-file: COPYING-Author: Eric Sessoms <nubgames@gmail.com>+Author: Eric Sessoms <nubgames@gmail.com>, Stephen Blackheath <http://blacksapphire.com/antispam/> Maintainer: nubgames@gmail.com homepage: http://github.com/esessoms/scgi Category: Network@@ -15,7 +15,7 @@ build-type: Simple library- build-depends: base, bytestring, cgi, network+ build-depends: base >=3 && <4, bytestring, cgi, network exposed-modules: Network.SCGI ghc-options: -fwarn-unused-binds -fwarn-unused-imports -fwarn-unused-matches hs-source-dirs: src
src/Network/SCGI.hs view
@@ -9,7 +9,7 @@ , module Network.CGI ) where -import qualified Control.Exception as E (IOException, bracket, catch, finally)+import qualified Control.Exception as E (bracket, catch, finally) import Control.Monad.Fix (fix) import Control.Concurrent import Data.ByteString.Lazy.Char8 (ByteString)@@ -26,7 +26,7 @@ (handle, _, _) <- accept socket E.catch (doSCGI f handle)- (\e -> hPutStrLn stderr $ show (e::E.IOException))+ (\e -> hPutStrLn stderr $ "scgi: "++show e) loop socket runOnceSCGI :: PortID -> CGI CGIResult -> IO ()@@ -56,7 +56,7 @@ (doSCGI f handle) (signalQSem qsem) )- (\e -> hPutStrLn stderr $ show (e::E.IOException))+ (\e -> hPutStrLn stderr $ "scgi: "++show e) loop socket withHandle :: Handle -> (Handle -> IO ()) -> IO ()