From 5c33dcb518082429b3f6cedc2823e9bd6df3ea16 Mon Sep 17 00:00:00 2001 From: Maximilian Tagher Date: Sun, 31 May 2020 16:56:09 -0400 Subject: [PATCH] .. --- yesod-test/Yesod/Test.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/yesod-test/Yesod/Test.hs b/yesod-test/Yesod/Test.hs index 570879bb..fbe7b64f 100644 --- a/yesod-test/Yesod/Test.hs +++ b/yesod-test/Yesod/Test.hs @@ -745,7 +745,7 @@ htmlNoneContain query search = do -- -- > {-# LANGUAGE OverloadedStrings #-} -- > get HomeR --- > htmlNoneContain "p" 3 -- There are exactly 3

tags in the response +-- > htmlCount "p" 3 -- There are exactly 3

tags in the response htmlCount :: HasCallStack => Query -> Int -> YesodExample site () htmlCount query count = do matches <- fmap DL.length $ htmlQuery query