From f2341355c1846c1a7ce27cb7963427acf01869aa Mon Sep 17 00:00:00 2001 From: Mark Wotton Date: Mon, 21 Mar 2016 17:20:02 -0400 Subject: [PATCH] documentation fixes --- yesod-test/Yesod/Test.hs | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/yesod-test/Yesod/Test.hs b/yesod-test/Yesod/Test.hs index cac92a6a..928320cf 100644 --- a/yesod-test/Yesod/Test.hs +++ b/yesod-test/Yesod/Test.hs @@ -695,12 +695,13 @@ get url = request $ do setUrl url -- | Follow a redirect, if the last response was a redirect. +-- | (We consider 301, 302, 303, 307 and 308 as redirects.) -- | Return Left with an error message if not a redirect -- | Return Right with the redirected URL if it was. -- -- ==== __Examples__ --- > get HomeR -- +-- > get HomeR -- > followRedirect followRedirect :: Yesod site => YesodExample site (Either T.Text T.Text)