From 8ee771896cd4484d59c69b12216bdb7e6ee302d2 Mon Sep 17 00:00:00 2001 From: Maximilian Tagher Date: Fri, 29 Nov 2019 10:46:25 -0500 Subject: [PATCH] .. --- yesod-test/test/main.hs | 2 -- 1 file changed, 2 deletions(-) diff --git a/yesod-test/test/main.hs b/yesod-test/test/main.hs index 327bc16b..1e07ae8c 100644 --- a/yesod-test/test/main.hs +++ b/yesod-test/test/main.hs @@ -45,7 +45,6 @@ import Control.Monad.IO.Unlift (toIO) import qualified Web.Cookie as Cookie import Data.Maybe (isNothing) import qualified Data.Text as T --- import qualified Data.Aeson as A parseQuery_ :: Text -> [[SelectorGroup]] parseQuery_ = either error id . parseQuery @@ -587,7 +586,6 @@ app = liteApp $ do (sendStatusJSON status200 ([1] :: [Integer])) :: LiteHandler Value onStatic "get-json-wrong-content-type" $ dispatchTo $ do return ("[1]" :: Text) - -- (sendResponse "[1]") :: LiteHandler Text cookieApp :: LiteApp cookieApp = liteApp $ do