From 096afbc124538b1c6c0cd78d11163ba8a660d519 Mon Sep 17 00:00:00 2001 From: Nicolas BACQUEY Date: Thu, 17 Mar 2022 14:26:17 +0100 Subject: [PATCH] Resolve shadowing warnings by hiding shadowed values --- servant-server/test/Servant/Server/StreamingSpec.hs | 3 ++- .../test/Servant/Server/UsingContextSpec/TestCombinators.hs | 3 ++- 2 files changed, 4 insertions(+), 2 deletions(-) diff --git a/servant-server/test/Servant/Server/StreamingSpec.hs b/servant-server/test/Servant/Server/StreamingSpec.hs index 5f4697fa..78cf7d78 100644 --- a/servant-server/test/Servant/Server/StreamingSpec.hs +++ b/servant-server/test/Servant/Server/StreamingSpec.hs @@ -21,7 +21,8 @@ import Network.Wai import Network.Wai.Internal import Prelude () import Prelude.Compat -import Servant +import Servant hiding + (respond) import qualified System.Timeout import Test.Hspec diff --git a/servant-server/test/Servant/Server/UsingContextSpec/TestCombinators.hs b/servant-server/test/Servant/Server/UsingContextSpec/TestCombinators.hs index 1701a07d..10f62592 100644 --- a/servant-server/test/Servant/Server/UsingContextSpec/TestCombinators.hs +++ b/servant-server/test/Servant/Server/UsingContextSpec/TestCombinators.hs @@ -19,7 +19,8 @@ module Servant.Server.UsingContextSpec.TestCombinators where import GHC.TypeLits -import Servant +import Servant hiding + (inject) data ExtractFromContext