From 463665e8a91e8b0611c3e8413842182c67d3ea3d Mon Sep 17 00:00:00 2001 From: Andrew Date: Fri, 27 Nov 2020 18:06:40 +0400 Subject: Changed String to Text everywhere --- Web/Request.hs | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) (limited to 'Web/Request.hs') diff --git a/Web/Request.hs b/Web/Request.hs index 38f91b5..71dc421 100644 --- a/Web/Request.hs +++ b/Web/Request.hs @@ -1,9 +1,11 @@ module Web.Request where +import Data.Text (Text) + import Web.Http -- Request query url method -data Request = Request [QueryPair] String Method +data Request = Request [QueryPair] Text Method deriving Show getQuery (Request query _ _) = query -- cgit v1.2.3