servant-mock 0.4.4.3 → 0.4.4.4

raw patch · 2 files changed

+3/−2 lines, 2 files

Files

• servant-mock.cabal +1/−1
• src/Servant/Mock.hs +2/−1

@@ -1,5 +1,5 @@ name:                servant-mock-version:             0.4.4.3+version:             0.4.4.4 synopsis:            Derive a mock server for free from your servant API types description:   Derive a mock server for free from your servant API types

@@ -5,6 +5,7 @@ {-# LANGUAGE ScopedTypeVariables #-} {-# LANGUAGE TypeFamilies        #-} {-# LANGUAGE TypeOperators       #-}+{-# OPTIONS_GHC -fno-warn-orphans #-} -- | -- Module     : Servant.Mock -- Copyright  : 2015 Alp Mestanogullari@@ -153,7 +154,7 @@   mock _ = mockArbitrary  instance HasMock Raw where-  mock _ = \req respond -> do+  mock _ = \_ respond -> do     bdy <- genBody     respond $ responseLBS status200 [] bdy