Spock 0.5.0.0 → 0.5.0.1

raw patch · 2 files changed

+2/−2 lines, 2 files

Files

• Spock.cabal +1/−1
• src/Web/Spock/Wire.hs +1/−1

@@ -1,5 +1,5 @@ name:                Spock-version:             0.5.0.0+version:             0.5.0.1 synopsis:            Another Haskell web framework for rapid development description:         This toolbox provides everything you need to get a quick start into web hacking with haskell: routing, middleware, json, blaze, sessions, cookies, database helper, csrf-protection, global state Homepage:            https://github.com/agrafix/Spock

@@ -145,7 +145,7 @@                                      getParams = map (\(k, mV) -> (T.decodeUtf8 k, T.decodeUtf8 $ fromMaybe BS.empty mV)) $ Wai.queryString req                                      params = HM.fromList $ captureParams ++ postParams ++ getParams                                      env = RequestInfo req params uploadedFiles-                                     resp = errorResponse status500 "500 - No response implemented"+                                     resp = errorResponse status200 ""                                  (respState, _) <- spockLift $ execRWST (runActionT action) env resp                                  forM_ (HM.elems uploadedFiles) $ \uploadedFile ->                                      do stillThere <- doesFileExist (uf_tempLocation uploadedFile)