From 552bce7cf27b27ba912c202af7322d6f8481f712 Mon Sep 17 00:00:00 2001
From: Saurabh Nanda <saurabh@vacationlabs.com>
Date: Mon, 30 Dec 2019 21:57:47 +0530
Subject: [PATCH] fixed docs of urlEncode/urlDecode wrt '+' encoding

---
 Network/HTTP/Types/URI.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/Network/HTTP/Types/URI.hs b/Network/HTTP/Types/URI.hs
index ce89e67..079a985 100644
--- a/Network/HTTP/Types/URI.hs
+++ b/Network/HTTP/Types/URI.hs
@@ -215,13 +215,13 @@ urlEncodeBuilder True  = urlEncodeBuilder' unreservedQS
 urlEncodeBuilder False = urlEncodeBuilder' unreservedPI
 
 -- | Percent-encoding for URLs.
-urlEncode :: Bool -- ^ Whether to decode @\'+\'@ to @\' \'@
+urlEncode :: Bool -- ^ @True@ = encode @\'+\'@ to @%2B@ . @False@ = @\'+\'@ remains as-is.
           -> B.ByteString -- ^ The ByteString to encode as URL
           -> B.ByteString -- ^ The encoded URL
 urlEncode q = BL.toStrict . B.toLazyByteString . urlEncodeBuilder q
 
 -- | Percent-decoding.
-urlDecode :: Bool -- ^ Whether to decode @\'+\'@ to @\' \'@
+urlDecode :: Bool -- ^ @True@ = decode @\'+\'@ to @\' \'@ (space). @False@ = @\'+\'@ remains as-is.
           -> B.ByteString -> B.ByteString
 urlDecode replacePlus z = fst $ B.unfoldrN (B.length z) go z
   where