TheAnachronism/docspell
1
0
Fork 0
mirror of https://github.com/TheAnachronism/docspell.git synced 2025-09-30 08:38:22 +00:00
Code Issues Packages Projects Releases Wiki Activity

Add mail form when creating shares

Browse Source
This commit is contained in:
eikek
2021-10-08 10:15:19 +02:00
parent 337293128d
commit 16ccddab9f
22 changed files with 535 additions and 56 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
modules/webapp/src/main/elm/Page/CollectiveSettings/Data.elm
View File

@@ -52,7 +52,7 @@ init flags =
Comp.CollectiveSettingsForm.init flags Api.Model.CollectiveSettings.empty
( shm, shc ) =
Comp.ShareManage.init
Comp.ShareManage.init flags
in
( { currentTab = Just InsightsTab
, sourceModel = sm

8
modules/webapp/src/main/elm/Page/CollectiveSettings/View2.elm
View File

@@ -118,7 +118,7 @@ viewContent texts flags settings model =
viewSources texts flags settings model
Just ShareTab ->
viewShares texts flags model
viewShares texts settings flags model
Nothing ->
[]
@@ -245,8 +245,8 @@ viewSources texts flags settings model =
]
viewShares : Texts -> Flags -> Model -> List (Html Msg)
viewShares texts flags model =
viewShares : Texts -> UiSettings -> Flags -> Model -> List (Html Msg)
viewShares texts settings flags model =
[ h1
[ class S.header1
, class "inline-flex items-center"
@@ -256,7 +256,7 @@ viewShares texts flags model =
[ text texts.shares
]
]
, Html.map ShareMsg (Comp.ShareManage.view texts.shareManage flags model.shareModel)
, Html.map ShareMsg (Comp.ShareManage.view texts.shareManage settings flags model.shareModel)
]