Renamings

haskell-servant · Dec 8, 2024 · 24e478d · 24e478d
1 parent a30efb0
commit 24e478d
Show file tree

Hide file tree

Showing 6 changed files with 6 additions and 6 deletions.
diff --git a/servant-client-core/src/Servant/Client/Core/HasClient.hs b/servant-client-core/src/Servant/Client/Core/HasClient.hs
@@ -87,7 +87,7 @@ import           Servant.Client.Core.BasicAuth
 import           Servant.Client.Core.ClientError
 import           Servant.Client.Core.Request
 import           Servant.Client.Core.Response
-import           Servant.Client.Core.ResponseUnrender
+import           Servant.Client.Core.MultiVerb.ResponseUnrender
 import qualified Servant.Client.Core.Response as Response
 import           Servant.Client.Core.RunClient
 import           Servant.API.MultiVerb

diff --git a/servant-client-core/src/Servant/Client/Core/MultiVerb/ResponseUnrender.hs b/servant-client-core/src/Servant/Client/Core/MultiVerb/ResponseUnrender.hs
@@ -1,5 +1,5 @@
 {-# LANGUAGE ApplicativeDo #-}
-module Servant.Client.Core.ResponseUnrender where
+module Servant.Client.Core.MultiVerb.ResponseUnrender where
 
 import Control.Applicative
 import Control.Monad

diff --git a/servant-client-core/src/Servant/Client/Core/Response.hs b/servant-client-core/src/Servant/Client/Core/Response.hs
@@ -31,7 +31,7 @@ import           Network.HTTP.Types
 
 import           Servant.API.Stream
                  (SourceIO)
-import           Servant.Types.ResponseList
+import           Servant.Types.Internal.ResponseList
 
 data ResponseF a = Response
   { responseStatusCode  :: Status

diff --git a/servant-server/src/Servant/Server/Internal/ResponseRender.hs b/servant-server/src/Servant/Server/Internal/ResponseRender.hs
@@ -19,7 +19,7 @@ import Servant.API.MultiVerb
 import Servant.API.Status
 import Servant.API.Stream (SourceIO)
 import Servant.API.UVerb.Union
-import Servant.Types.ResponseList
+import Servant.Types.Internal.ResponseList
 import qualified Network.HTTP.Media as M
 import Data.Foldable (toList)
 import Data.Sequence ((<|))

diff --git a/servant/servant.cabal b/servant/servant.cabal
@@ -116,7 +116,7 @@ library
   -- Types
   exposed-modules:
     Servant.Types.SourceT
-    Servant.Types.ResponseList
+    Servant.Types.Internal.ResponseList
 
   -- Test stuff
   exposed-modules: Servant.Test.ComprehensiveAPI

diff --git a/servant/src/Servant/Types/ResponseList.hs → ...rc/Servant/Types/Internal/ResponseList.hs b/servant/src/Servant/Types/ResponseList.hs → ...rc/Servant/Types/Internal/ResponseList.hs
@@ -3,7 +3,7 @@
 -- | This module offers other servant libraries a minimalistic HTTP response type.
 --
 -- It is purely an internal API and SHOULD NOT be used by end-users of Servant.
-module Servant.Types.ResponseList where
+module Servant.Types.Internal.ResponseList where
 
 import Network.HTTP.Types (Status, Header)
 import Data.Sequence (Seq)