Skip to content

Commit 9a91d57

Browse files
committed
Fix build for lens 4.5. Close haskell#33.
Signed-off-by: Ricky Elrod <ricky@elrod.me>
1 parent 70d7acd commit 9a91d57

2 files changed

Lines changed: 3 additions & 3 deletions

File tree

Network/Wreq/Lens/Machinery.hs

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -13,8 +13,8 @@ import Language.Haskell.TH.Syntax (Dec, Name, Q, mkName, nameBase)
1313
defaultRules :: LensRules
1414
defaultRules = lensRules
1515

16-
fieldName :: (String -> String) -> [Name] -> Name -> [DefName]
17-
fieldName f _ name = [TopName . mkName . f . nameBase $ name]
16+
fieldName :: (String -> String) -> Name -> [Name] -> Name -> [DefName]
17+
fieldName f _ _ name = [TopName . mkName . f . nameBase $ name]
1818

1919
makeLenses :: Name -> Q [Dec]
2020
makeLenses = makeLensesWith (defaultRules & lensField .~ fieldName id)

wreq.cabal

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -103,7 +103,7 @@ library
103103
http-client >= 0.3.1.1,
104104
http-client-tls >= 0.2,
105105
http-types >= 0.8,
106-
lens >= 4.4,
106+
lens >= 4.5,
107107
lens-aeson,
108108
mime-types,
109109
old-locale,

0 commit comments

Comments
 (0)