Fix HasSchemaCommon instance for Schema
commitd3ea08d33adf50f669af7ba67c23e7ce135dbb2e
authorNickolay Kudasov <nickolay.kudasov@gmail.com>
dateSun 22 Nov 2015, 01:46 (11 years ago)
parent67a2dcd
src/Data/Swagger/Lens.hs+1−1
@@ -60,7 +60,7 @@ instance HasDescription ExternalDocs (Maybe Text) where description = external
6060class HasSchemaCommon s where
6161 schemaCommon :: Lens' s SchemaCommon
6262
63−instance HasSchemaCommon Schema where schemaCommon = schemaCommon
63+instance HasSchemaCommon Schema where schemaCommon = schemaSchemaCommon
6464instance HasSchemaCommon ParameterOtherSchema where schemaCommon = parameterOtherSchemaCommon
6565instance HasSchemaCommon Items where schemaCommon = itemsCommon
6666instance HasSchemaCommon Header where schemaCommon = headerCommon