@@ -120,7 +120,6 @@ timeParamSchema :: String -> ParamSchema t
120timeParamSchema format = mempty
120timeParamSchema format = mempty
121 & schemaType .~ SwaggerString
121 & schemaType .~ SwaggerString
122 & schemaFormat ?~ T.pack format
122 & schemaFormat ?~ T.pack format
123− & schemaMinLength ?~ toInteger (length format)
126-- >>> toParamSchema (Proxy :: Proxy Day) ^. schemaFormat
125-- >>> toParamSchema (Proxy :: Proxy Day) ^. schemaFormat