kubernetes-client/haskell
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Revert "Generated code using date format"

Browse Source 
This reverts commit 3aaceece57.
This commit is contained in:
Fernando Rincon
2019-10-01 22:29:38 +08:00
parent a224f7070d
commit d1919b64cc
1 changed files with 6 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
kubernetes/lib/Kubernetes/OpenAPI/Core.hs
View File

@@ -434,16 +434,16 @@ instance P.Show DateTime where
instance MimeRender MimeMultipartFormData DateTime where
mimeRender _ = mimeRenderDefaultMultipartFormData
-- | @TI.parseTimeM True TI.defaultTimeLocale "%FT%T%6QZ"@
_readDateTime :: (TI.ParseTime t, Monad m, ) => String -> m t
-- | @_parseISO8601@
_readDateTime :: (TI.ParseTime t, Monad m, Alternative m) => String -> m t
_readDateTime =
TI.parseTimeM True TI.defaultTimeLocale "%FT%T%6QZ"
_parseISO8601
{-# INLINE _readDateTime #-}
-- | @TI.formatTime TI.defaultTimeLocale "%FT%T%6QZ"@
_showDateTime :: (TI.FormatTime t) => t -> String
-- | @TI.formatISO8601Micros@
_showDateTime :: (t ~ TI.UTCTime, TI.FormatTime t) => t -> String
_showDateTime =
TI.formatTime TI.defaultTimeLocale "%FT%T%6QZ"
TI.formatISO8601Micros
{-# INLINE _showDateTime #-}
-- | parse an ISO8601 date-time string