Fix search on initial page load

It must now wait until ui-settings have been provided.
This commit is contained in:
Eike Kettner 2020-06-08 01:17:08 +02:00
parent e8c3edfd23
commit 4c832dba35

View File

@ -177,6 +177,7 @@ updateWithSub msg model =
GetUiSettings settings -> GetUiSettings settings ->
Util.Update.andThen1 Util.Update.andThen1
[ updateUserSettings Page.UserSettings.Data.UpdateSettings [ updateUserSettings Page.UserSettings.Data.UpdateSettings
, updateHome Page.Home.Data.DoSearch
] ]
{ model | uiSettings = settings } { model | uiSettings = settings }
|> noSub |> noSub