Merge pull request #302 from eikek/ui-fixes

Ui fixes
This commit is contained in:
eikek 2020-10-03 01:10:52 +02:00 committed by GitHub
commit df95513ba3
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
2 changed files with 6 additions and 2 deletions

View File

@ -381,7 +381,11 @@ initPage model_ page =
updateQueue Page.Queue.Data.StopRefresh model updateQueue Page.Queue.Data.StopRefresh model
UploadPage _ -> UploadPage _ ->
updateQueue Page.Queue.Data.StopRefresh model Util.Update.andThen2
[ updateQueue Page.Queue.Data.StopRefresh
, updateUpload Page.Upload.Data.Clear
]
model
NewInvitePage -> NewInvitePage ->
updateQueue Page.Queue.Data.StopRefresh model updateQueue Page.Queue.Data.StopRefresh model

View File

@ -26,7 +26,7 @@ update mId key flags settings msg model =
Init -> Init ->
Util.Update.andThen2 Util.Update.andThen2
[ update mId key flags settings (SearchMenuMsg Comp.SearchMenu.Init) [ update mId key flags settings (SearchMenuMsg Comp.SearchMenu.Init)
, scrollToCard mId , doSearch flags settings
] ]
model model