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

Refactor link-target in a separate module

Browse Source
This commit is contained in:
Eike Kettner
2020-11-14 11:32:19 +01:00
parent 4b700fb249
commit 23391ef41c
4 changed files with 110 additions and 64 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
modules/webapp/src/main/elm/Comp/ItemCardList.elm
View File

@ -14,6 +14,7 @@ import Api.Model.ItemLight exposing (ItemLight)
import Api.Model.ItemLightGroup exposing (ItemLightGroup)
import Api.Model.ItemLightList exposing (ItemLightList)
import Comp.ItemCard
import Comp.LinkTarget exposing (LinkTarget)
import Data.Flags exposing (Flags)
import Data.ItemSelection exposing (ItemSelection)
import Data.Items
@ -75,7 +76,7 @@ type alias UpdateResult =
, cmd : Cmd Msg
, dragModel : DD.Model
, selection : ItemSelection
, linkTarget : Comp.ItemCard.LinkTarget
, linkTarget : LinkTarget
}
@ -96,7 +97,7 @@ updateDrag dm _ msg model =
Cmd.none
dm
Data.ItemSelection.Inactive
Comp.ItemCard.LinkNone
Comp.LinkTarget.LinkNone
AddResults list ->
if list.groups == [] then
@ -104,7 +105,7 @@ updateDrag dm _ msg model =
Cmd.none
dm
Data.ItemSelection.Inactive
Comp.ItemCard.LinkNone
Comp.LinkTarget.LinkNone
else
let
@ -115,7 +116,7 @@ updateDrag dm _ msg model =
Cmd.none
dm
Data.ItemSelection.Inactive
Comp.ItemCard.LinkNone
Comp.LinkTarget.LinkNone
ItemCardMsg item lm ->
let