TheAnachronism/docspell
1
0
Fork 0
mirror of https://github.com/TheAnachronism/docspell.git synced 2025-04-05 10:59:33 +00:00
Code Issues Packages Projects Releases Wiki Activity

Fix scrolling to card

Browse Source 
That was broken due to the independent scroll in commit #bcb1b8.
This commit is contained in:
Eike Kettner 2021-01-09 02:00:01 +01:00
parent cef1c38cc4
commit cbca4d234f
2 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -648,7 +648,7 @@ scrollToCard : Maybe String -> Model -> ( Model, Cmd Msg, Sub Msg )
scrollToCard mId model = scrollToCard mId model =
let let
scroll id = scroll id =
Scroll.scroll id 0.5 0.5 0.5 0.5 Scroll.scrollElementY "item-card-list" id 0.5 0.5
in in
case mId of case mId of
Just id -> Just id ->

1
modules/webapp/src/main/elm/Page/Home/View.elm
View File

@ -110,6 +110,7 @@ view flags settings model =
, ( "sixteen wide column", menuCollapsed model ) , ( "sixteen wide column", menuCollapsed model )
, ( "item-card-list", True ) , ( "item-card-list", True )
] ]
, id "item-card-list"
] ]
(List.concat (List.concat
[ viewBar flags model [ viewBar flags model