on master help sign in
Fixed tests and a broken cabal file
commit215b7bc5127bec8ad0c7e128c314c16cb557267e authorMichael Snoyman <michael@snoyman.com> dateFri 6 Jan 2012, 13:14 (15 years ago) parent5eef19d
2 files changed+3−2
wai-extra/test/WaiExtraTest.hs+2−2 wai-handler-launch/wai-handler-launch.cabal+1
wai-extra/test/WaiExtraTest.hs+2−2
@@ -425,9 +425,9 @@ caseDebugRequestBody = do
425425 where
426426 params = [("foo", "bar"), ("baz", "bin")]
427427 -- FIXME change back once we include post parameter output in logging postOutput = T.pack $ "POST \nAccept: \nPOST " ++ (show params)
428− postOutput = T.pack $ "POST / Accept: "
428+ postOutput = T.pack $ "POST / Accept: \n"
429429 -- FIXME getOutput _qs = T.pack $ "GET /location" ++ "\nAccept: \nGET " ++ (show params) -- \nAccept: \n" ++ (show params)
430− getOutput _qs = T.pack $ "GET /location?foo=bar&baz=bin Accept: "
430+ getOutput _qs = T.pack $ "GET /location?foo=bar&baz=bin Accept: \n"
431431
432432 debugApp output' = logHandle (\t -> liftIO $ assertEqual "debug" output t) $ \_req -> do
433433 return $ responseLBS status200 [ ] ""
wai-handler-launch/wai-handler-launch.cabal+1
@@ -1,3 +1,4 @@
1+Name: wai-handler-launch
12Version: 1.0.0
23Synopsis: Launch a web app in the default browser.
34Description: This handles cross-platform launching and inserts Javascript code to ping the server. When the server no longer receives pings, it shuts down.