yesod-test 0.2.0.2 → 0.2.0.3
raw patch · 2 files changed
+6/−12 lines, 2 filesdep ~basedep ~hspec
Dependency ranges changed: base, hspec
Files
- Yesod/Test.hs +2/−2
- yesod-test.cabal +4/−10
Yesod/Test.hs view
@@ -324,10 +324,10 @@ -- Receives a CSS selector that should resolve to the form element containing the nonce. addNonce_ :: Query -> RequestBuilder () addNonce_ scope = do- matches <- htmlQuery $ scope `mappend` "input[name=_nonce][type=hidden][value]"+ matches <- htmlQuery $ scope `mappend` "input[name=_token][type=hidden][value]" case matches of [] -> failure $ "No nonce found in the current page"- element:[] -> byName "_nonce" $ head $ parseHTML element $ getAttrValue "value"+ element:[] -> byName "_token" $ head $ parseHTML element $ getAttrValue "value" _ -> failure $ "More than one nonce found in the page" -- | For responses that display a single form, just lookup the only nonce available.
yesod-test.cabal view
@@ -1,5 +1,5 @@ name: yesod-test-version: 0.2.0.2+version: 0.2.0.3 license: MIT license-file: LICENSE author: Nubis <nubis@woobiz.com.ar>@@ -13,20 +13,14 @@ description: Behaviour Oriented integration Testing for Yesod Applications extra-source-files: README.md, LICENSE -flag ghc7- flag blaze_html_0_5 description: use blaze-html 0.5 and blaze-markup 0.5 default: False library- if flag(ghc7)- build-depends: base >= 4.3 && < 5- cpp-options: -DGHC7- else- build-depends: base >= 4 && < 4.3- build-depends: hxt >= 9.1.6+ build-depends: base >= 4.3 && < 5+ , hxt >= 9.1.6 , attoparsec >= 0.10 && < 0.11 , persistent >= 0.9 && < 0.10 , transformers >= 0.2.2 && < 0.4@@ -67,7 +61,7 @@ hs-source-dirs: test build-depends: base , yesod-test- , hspec >= 0.9 && < 0.10+ , hspec , HUnit , xml-conduit , bytestring