git.iko.soy/typeable/swagger2
on master help sign in
Change head to head_ for PathItem (conflict with Prelude)
0e7c55bNickolay Kudasov
src/Data/Swagger/Internal/Utils.hs+1
@@ -45,6 +45,7 @@ swaggerFieldRules = defaultFieldRules & lensField %~ swaggerFieldNamer
45 fixName' "minimum" = "minimum_" -- Prelude conflict
45 fixName' "minimum" = "minimum_" -- Prelude conflict
46 fixName' "maximum" = "maximum_" -- Prelude conflict
46 fixName' "maximum" = "maximum_" -- Prelude conflict
47 fixName' "enum" = "enum_" -- Control.Lens conflict
47 fixName' "enum" = "enum_" -- Control.Lens conflict
48+ fixName' "head" = "head_" -- Prelude conflict
48 fixName' n = n
49 fixName' n = n
49
50
50gunfoldEnum :: String -> [a] -> (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c a
51gunfoldEnum :: String -> [a] -> (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c a
src/Data/Swagger/Lens.hs+1−1
@@ -26,7 +26,7 @@ makeFields ''Host
26makeFields ''Info
26makeFields ''Info
27makeFields ''Contact
27makeFields ''Contact
28makeFields ''License
28makeFields ''License
29−makeFields ''PathItem
29+makeLensesWith swaggerFieldRules ''PathItem
30makeFields ''Tag
30makeFields ''Tag
31makeFields ''Operation
31makeFields ''Operation
32makeFields ''Param
32makeFields ''Param