@@ -98,8 +98,10 @@ instance OpenApiOptionModifier UnwrapUnaryRecords where
9898
9999instance OpenApiOptionModifier OmitNothingFields
100100
101+#if MIN_VERSION_deriving_aeson(0,2,4)
101102instance OpenApiOptionModifier RejectUnknownFields where
102103 openApiSchemaModifier = schema . additionalProperties .~ Just (AdditionalPropertiesAllowed False)
104+#endif
103105
104106instance StringModifier f => OpenApiOptionModifier (FieldLabelModifier f) where
105107 openApiOptionsModifier o = o {fieldLabelModifier = getStringModifier @f}