mirror of
https://github.com/TheAnachronism/docspell.git
synced 2025-07-04 16:48:26 +00:00
Fix person-org relation info
This commit is contained in:
@ -335,10 +335,13 @@ personMatchesOrg model =
|
|||||||
Comp.Dropdown.getSelected model.corrOrgModel
|
Comp.Dropdown.getSelected model.corrOrgModel
|
||||||
|> List.head
|
|> List.head
|
||||||
|
|
||||||
persOrg =
|
pers =
|
||||||
Comp.Dropdown.getSelected model.corrPersonModel
|
Comp.Dropdown.getSelected model.corrPersonModel
|
||||||
|> List.head
|
|> List.head
|
||||||
|
|
||||||
|
persOrg =
|
||||||
|
pers
|
||||||
|> Maybe.andThen (\idref -> Dict.get idref.id model.allPersons)
|
|> Maybe.andThen (\idref -> Dict.get idref.id model.allPersons)
|
||||||
|> Maybe.andThen .organization
|
|> Maybe.andThen .organization
|
||||||
in
|
in
|
||||||
org == Nothing || org == persOrg
|
org == Nothing || pers == Nothing || org == persOrg
|
||||||
|
Reference in New Issue
Block a user