@@ -277,7 +277,6 @@ timeSchema :: T.Text -> Schema
277277timeSchema format = mempty
278278 & schemaType .~ SwaggerString
279279 & schemaFormat ?~ format
280− & schemaMinLength ?~ toInteger (T.length format)
281280
282281-- |
283282-- >>> toSchema (Proxy :: Proxy Day) ^. schemaFormat
@@ -296,7 +295,6 @@ instance ToSchema LocalTime where
296295-- Just "yyyy-mm-ddThh:MM:ss(Z|+hh:MM)"
297296instance ToSchema ZonedTime where
298297 declareNamedSchema _ = pure $ named "ZonedTime" $ timeSchema "yyyy-mm-ddThh:MM:ss(Z|+hh:MM)"
299− & schemaMinLength ?~ toInteger (T.length "yyyy-mm-ddThh:MM:ssZ")
300298
301299instance ToSchema NominalDiffTime where
302300 declareNamedSchema _ = declareNamedSchema (Proxy :: Proxy Integer)