git.iko.soy/typeable/wai
on master help sign in
WAI 0.3
commitdaab38e9fe294e3a35a46d739d5d9da910b8566e authorMichael Snoyman <michael@snoyman.com> dateTue 28 Dec 2010, 06:05 (16 years ago) parent1e2403d
2 files changed+9−9
compare with master
unifiedsplit
Network/Wai/Handler/SCGI.hs+4−4 wai-handler-scgi.cabal+5−5
Network/Wai/Handler/SCGI.hs+4−4
@@ -5,11 +5,11 @@ module Network.Wai.Handler.SCGI
55 ) where
66
77import Network.Wai
8−import Network.Wai.Handler.CGI (run'')
9−import Network.Wai.Handler.Helper (requestBodyFunc)
8+import Network.Wai.Handler.CGI (run'', requestBodyFunc)
109import Foreign.Ptr
1110import Foreign.Marshal.Alloc
1211import Foreign.C
12+import Data.ByteString (ByteString)
1313import qualified Data.ByteString as S
1414import qualified Data.ByteString.Unsafe as S
1515import qualified Data.ByteString.Char8 as S8
@@ -19,10 +19,10 @@ import Data.ByteString.Lazy.Internal (defaultChunkSize)
1919run :: Application -> IO ()
2020run app = runOne Nothing app >> run app
2121
22−runSendfile :: String -> Application -> IO ()
22+runSendfile :: ByteString -> Application -> IO ()
2323runSendfile sf app = runOne (Just sf) app >> runSendfile sf app
2424
25−runOne :: Maybe String -> Application -> IO ()
25+runOne :: Maybe ByteString -> Application -> IO ()
2626runOne sf app = do
2727 socket <- c'accept 0 nullPtr nullPtr
2828 headersBS <- readNetstring socket
wai-handler-scgi.cabal+5−5
@@ -1,5 +1,5 @@
11name: wai-handler-scgi
2−version: 0.2.0
2+version: 0.3.0
33license: BSD3
44license-file: LICENSE
55author: Michael Snoyman <michael@snoyman.com>
@@ -12,10 +12,10 @@ build-type: Simple
1212homepage: http://github.com/snoyberg/wai-handler-scgi
1313
1414library
15− build-depends: base >= 4 && < 5,
16− wai >= 0.2.0 && < 0.3.0,
17− wai-extra >= 0.2.1 && < 0.3.0,
18− bytestring >= 0.9.1.4 && < 0.10
15+ build-depends: base >= 4 && < 5
16+ , wai >= 0.3 && < 0.4
17+ , wai-extra >= 0.3 && < 0.4
18+ , bytestring >= 0.9.1.4 && < 0.10
1919 exposed-modules: Network.Wai.Handler.SCGI
2020 ghc-options: -Wall
2121