tryBsMatch :: String -> String -> [(C.ByteString, C.ByteString)] -> Expectation
tryBsMatch a b h = shouldBe (lookup (C.pack a) h) (Just . C.pack $ b)
tryBsMatch :: String -> String -> [(C.ByteString, C.ByteString)] -> Expectation
tryBsMatch a b h = shouldBe (lookup (C.pack a) h) (Just . C.pack $ b)
tryBsMatch a b h = shouldBe (lookup (C.pack a) h) (Just . C.pack $ b)