RailsEventStore/rails_event_store

View on GitHub
ruby_event_store-browser/elm/src/BrowserTime.elm

Summary

Maintainability
Test Coverage
module BrowserTime exposing (TimeZone, defaultTimeZone, format)

import DateFormat exposing (dayOfMonthFixed, hourMilitaryFixed, millisecondFixed, minuteFixed, monthFixed, secondFixed, text, yearNumber)
import Time


type alias TimeZone =
    { zone : Time.Zone, zoneName : String }


defaultTimeZone : TimeZone
defaultTimeZone =
    { zone = Time.utc, zoneName = "UTC" }


format : TimeZone -> Time.Posix -> String
format { zone } time =
    DateFormat.format
        [ dayOfMonthFixed
        , text "."
        , monthFixed
        , text "."
        , yearNumber
        , text " "
        , hourMilitaryFixed
        , text ":"
        , minuteFixed
        , text ":"
        , secondFixed
        , text "."
        , millisecondFixed
        ]
        zone
        time