Remove Util.Time module, useing Message.DateFormat

modules/webapp/src/main/elm/Messages/DateFormat.elm

@@ -11,6 +11,7 @@ module Messages.DateFormat exposing
     , formatDateShort
     , formatDateTimeLong
     , formatDateTimeShort
+    , formatIsoDateTimeUtc
     )
 
 import DateFormat exposing (Token)
@@ -20,6 +21,7 @@ import Time
     exposing
         ( Month(..)
         , Weekday(..)
+        , Zone
         )
 
 
@@ -74,6 +76,29 @@ formatDateTimeShort lang millis =
     format lang .dateTimeShort millis
 
 
+isoDateTimeFormatter : List Token
+isoDateTimeFormatter =
+    [ DateFormat.yearNumber
+    , DateFormat.text "-"
+    , DateFormat.monthFixed
+    , DateFormat.text "-"
+    , DateFormat.dayOfMonthFixed
+    , DateFormat.text "T"
+    , DateFormat.hourMilitaryNumber
+    , DateFormat.text ":"
+    , DateFormat.minuteFixed
+    , DateFormat.text ":"
+    , DateFormat.secondFixed
+    , DateFormat.text "Z"
+    ]
+
+
+formatIsoDateTimeUtc : Int -> String
+formatIsoDateTimeUtc millis =
+    Time.millisToPosix millis
+        |> DateFormat.format isoDateTimeFormatter Time.utc
+
+
 
 --- Language Definitions