Skip to content

Instantly share code, notes, and snippets.

@dminuoso

dminuoso/f.hs Secret

Created June 2, 2021 23:02
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save dminuoso/fde24babea76ad23af01eb650ca185e7 to your computer and use it in GitHub Desktop.
Save dminuoso/fde24babea76ad23af01eb650ca185e7 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
f.hs
instance ToSchema LogEntry where
declareNamedSchema p = genericDeclareNamedSchema (stripFieldLower "le") p
<&> #schema % #description ?~ "Log entries with machine readable slugs and ISO8601 formatted timestamps"
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment