Allow calling variadic functions with repeated query params or JSON array in body

2020-10-26 17:49:51 -05:00
parent 18cc214c04
commit 302d4e15ad
9 changed files with 128 additions and 23 deletions
@@ -96,7 +96,7 @@ makeProcSchema pd =
  & required .~ map pgaName (filter pgaReq (pdArgs pd))

 makeProcProperty :: PgArg -> (Text, Referenced Schema)
-makeProcProperty (PgArg n t _) = (n, Inline s)
+makeProcProperty (PgArg n t _ _) = (n, Inline s)
  where
    s = (mempty :: Schema)
          & type_ ?~ toSwaggerType t