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

Indicate saving custom field values

Browse Source
This commit is contained in:
Eike Kettner
2020-11-23 00:16:50 +01:00
parent bcdb2fc0fe
commit 7026852123
9 changed files with 111 additions and 14 deletions
Download Patch File Download Diff File Expand all files Collapse all files

46
modules/webapp/src/main/elm/Comp/ItemDetail/Update.elm
View File

@ -1300,19 +1300,32 @@ update key flags inav settings msg model =
cmd_ =
Cmd.map CustomFieldMsg result.cmd
action =
loadingIcon =
"refresh loading icon"
( action, icons ) =
case result.result of
NoFieldChange ->
Cmd.none
( Cmd.none, model.customFieldSavingIcon )
FieldValueRemove field ->
Api.deleteCustomValue flags model.item.id field.id SaveResp
( Api.deleteCustomValue flags
model.item.id
field.id
(CustomFieldSaveResp field.id)
, Dict.insert field.id loadingIcon model.customFieldSavingIcon
)
FieldValueChange field value ->
Api.putCustomValue flags model.item.id (CustomFieldValue field.id value) SaveResp
( Api.putCustomValue flags
model.item.id
(CustomFieldValue field.id value)
(CustomFieldSaveResp field.id)
, Dict.insert field.id loadingIcon model.customFieldSavingIcon
)
FieldCreateNew ->
Cmd.none
( Cmd.none, model.customFieldSavingIcon )
sub_ =
Sub.map CustomFieldMsg result.subs
@ -1325,7 +1338,11 @@ update key flags inav settings msg model =
Nothing
model_ =
{ model | customFieldsModel = result.model, modalEdit = modalEdit }
{ model
| customFieldsModel = result.model
, modalEdit = modalEdit
, customFieldSavingIcon = icons
}
in
{ model = model_
, cmd = Cmd.batch [ cmd_, action ]
@ -1333,6 +1350,23 @@ update key flags inav settings msg model =
, linkTarget = Comp.LinkTarget.LinkNone
}
CustomFieldSaveResp fieldId (Ok res) ->
let
model_ =
{ model | customFieldSavingIcon = Dict.remove fieldId model.customFieldSavingIcon }
in
if res.success then
resultModelCmd
( model_
, Api.itemDetail flags model.item.id GetItemResp
)
else
resultModel model_
CustomFieldSaveResp fieldId (Err _) ->
resultModel { model | customFieldSavingIcon = Dict.remove fieldId model.customFieldSavingIcon }
--- Helper