Require a time zone when formatting date-times

This commit is contained in:
eikek
2022-03-01 21:58:30 +01:00
parent 6d822a0769
commit 6f7eafcebc
51 changed files with 456 additions and 349 deletions

View File

@ -32,6 +32,7 @@ import Data.Flags exposing (Flags)
import Data.ItemTemplate as IT exposing (ItemTemplate)
import Data.Pdf exposing (PdfMode)
import Data.TagOrder
import Data.TimeZone
import Data.UiSettings exposing (ItemPattern, StoredUiSettings, UiSettings)
import Dict exposing (Dict)
import Html exposing (..)
@ -646,8 +647,8 @@ settingFormTabs : Texts -> Flags -> StoredUiSettings -> Model -> List (Comp.Tabs
settingFormTabs texts flags _ model =
let
langCfg =
{ display = \lang -> Messages.get lang |> .label
, icon = \lang -> Just (Messages.get lang |> .flagIcon)
{ display = \lang -> Messages.get lang Data.TimeZone.utc |> .label
, icon = \lang -> Just (Messages.get lang Data.TimeZone.utc |> .flagIcon)
, style = DS.mainStyle
, selectPlaceholder = texts.basics.selectPlaceholder
}