Use empty items array for () schema

GetShopTV · Jan 16, 2016 · 4139a57 · 4139a57
1 parent a87f10d
commit 4139a57
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/src/Data/Swagger/Internal/Schema.hs b/src/Data/Swagger/Internal/Schema.hs
@@ -420,6 +420,7 @@ nullarySchema :: Schema
 nullarySchema = mempty
   & schemaType .~ SwaggerArray
   & schemaEnum ?~ [ toJSON () ]
+  & schemaItems ?~ SwaggerItemsArray []
 
 gtoNamedSchema :: GToSchema f => SchemaOptions -> proxy f -> NamedSchema
 gtoNamedSchema opts proxy = undeclare $ gdeclareNamedSchema opts proxy mempty