diff --git a/yesod-json/Yesod/Json.hs b/yesod-json/Yesod/Json.hs index 374408f6..509367a1 100644 --- a/yesod-json/Yesod/Json.hs +++ b/yesod-json/Yesod/Json.hs @@ -107,8 +107,7 @@ array = J.Array . V.fromList . map J.toJSON -- | jsonOrRedirect simplifies the scenario where a POST handler sends a different -- response based on Accept headers: -- --- 1. 200 with JSON data if the client prefers application/json (i.e. is an --- AJAX request) +-- 1. 200 with JSON data if the client prefers application/json (e.g. AJAX). -- -- 2. 3xx otherwise, following the PRG pattern. jsonOrRedirect :: (Yesod master, J.ToJSON a)