diff --git a/src/Handler/Health.hs b/src/Handler/Health.hs index 02257e1e9..ca41fe686 100644 --- a/src/Handler/Health.hs +++ b/src/Handler/Health.hs @@ -2,7 +2,7 @@ module Handler.Health where import Import -import Handler.Utils +-- import Handler.Utils import qualified Data.Aeson.Encode.Pretty as Aeson import qualified Data.Text.Lazy.Builder as Builder @@ -106,7 +106,7 @@ getStatusR :: Handler Html getStatusR = do starttime <- getsYesod appStartTime currtime <- liftIO getCurrentTime - ft <- formatTime' "%Y%m%d %H:%M:%S" currtime -- use me throughout or delete me (delete, since this Handler is for mechanised tests only) + -- ft <- formatTime' "%Y-%m-%d %H:%M:%S" currtime withUrlRenderer [hamlet| $doctype 5 @@ -116,8 +116,7 @@ getStatusR = do

Current Time
- #{show currtime}
- #{ft} + #{show currtime}

Instance Start
#{show starttime} #