Externalize strings in queue page

This commit is contained in:
Eike Kettner
2021-04-01 22:00:48 +02:00
parent 968c8e02b7
commit b9c98c6578
4 changed files with 104 additions and 39 deletions

View File

@ -133,7 +133,7 @@ mainContent model =
viewUserSettings model
QueuePage ->
viewQueue model
viewQueue texts model
RegisterPage ->
viewRegister texts model
@ -449,12 +449,17 @@ viewUserSettings model =
]
viewQueue : Model -> List (Html Msg)
viewQueue model =
viewQueue : Messages -> Model -> List (Html Msg)
viewQueue texts model =
[ Html.map QueueMsg
(Queue.viewSidebar model.sidebarVisible model.flags model.uiSettings model.queueModel)
(Queue.viewSidebar texts.queue
model.sidebarVisible
model.flags
model.uiSettings
model.queueModel
)
, Html.map QueueMsg
(Queue.viewContent model.flags model.uiSettings model.queueModel)
(Queue.viewContent texts.queue model.flags model.uiSettings model.queueModel)
]