TheAnachronism/docspell
1
0
Fork 0
mirror of https://github.com/TheAnachronism/docspell.git synced 2025-06-23 19:08:26 +00:00
Code Issues Packages Projects Releases Wiki Activity

Fix initialising pages; improve scroll to item

Browse Source
This commit is contained in:
Eike Kettner
2020-09-25 22:54:50 +02:00
parent 2773eb5341
commit ca05b3c195
2 changed files with 8 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
modules/webapp/src/main/elm/Page/Home/Update.elm
View File

@ -26,7 +26,7 @@ update mId key flags settings msg model =
Init ->
Util.Update.andThen2
[ update mId key flags settings (SearchMenuMsg Comp.SearchMenu.Init)
, doSearch flags settings
, scrollToCard mId
]
model
@ -251,7 +251,7 @@ update mId key flags settings msg model =
ScrollResult _ ->
let
cmd =
Process.sleep 350 |> Task.perform (always ClearItemDetailId)
Process.sleep 800 |> Task.perform (always ClearItemDetailId)
in
withSub ( model, cmd )