Skip to content

Commit

Permalink
Merge pull request #388 from bgamari/master
Browse files Browse the repository at this point in the history
Compatibility with GHC 8.0
  • Loading branch information
kosmikus committed Apr 13, 2016
2 parents 15143cc + c6e5126 commit 1807c72
Show file tree
Hide file tree
Showing 2 changed files with 2 additions and 2 deletions.
2 changes: 1 addition & 1 deletion servant-server/servant-server.cabal
Original file line number Diff line number Diff line change
Expand Up @@ -66,7 +66,7 @@ library
, system-filepath >= 0.4 && < 0.5
, filepath >= 1
, text >= 1.2 && < 1.3
, transformers >= 0.3 && < 0.5
, transformers >= 0.3 && < 0.6
, transformers-compat>= 0.4
, wai >= 3.0 && < 3.3
, wai-app-static >= 3.0 && < 3.2
Expand Down
2 changes: 1 addition & 1 deletion servant/src/Servant/API/ContentTypes.hs
Original file line number Diff line number Diff line change
Expand Up @@ -169,7 +169,7 @@ class (AllMime list) => AllCTRender (list :: [*]) a where
handleAcceptH :: Proxy list -> AcceptHeader -> a -> Maybe (ByteString, ByteString)

instance OVERLAPPABLE_
(AllMimeRender (ct ': cts) a) => AllCTRender (ct ': cts) a where
(Accept ct, AllMime cts, AllMimeRender (ct ': cts) a) => AllCTRender (ct ': cts) a where
handleAcceptH _ (AcceptHeader accept) val = M.mapAcceptMedia lkup accept
where pctyps = Proxy :: Proxy (ct ': cts)
amrs = allMimeRender pctyps val
Expand Down

0 comments on commit 1807c72

Please sign in to comment.