mirror of
https://github.com/TheAnachronism/docspell.git
synced 2025-06-28 11:08:27 +00:00
Make ItemMerge independent from the action
This commit is contained in:
@ -600,8 +600,11 @@ update texts bookmarkId lastViewedItemId env msg model =
|
||||
case model.viewMode of
|
||||
SelectView svm ->
|
||||
let
|
||||
action =
|
||||
Api.mergeItemsTask env.flags
|
||||
|
||||
result =
|
||||
Comp.ItemMerge.update env.flags lmsg svm.mergeModel
|
||||
Comp.ItemMerge.update env.flags action lmsg svm.mergeModel
|
||||
|
||||
nextView =
|
||||
case result.outcome of
|
||||
@ -611,13 +614,13 @@ update texts bookmarkId lastViewedItemId env msg model =
|
||||
Comp.ItemMerge.OutcomeNotYet ->
|
||||
SelectView { svm | mergeModel = result.model }
|
||||
|
||||
Comp.ItemMerge.OutcomeMerged ->
|
||||
Comp.ItemMerge.OutcomeActionDone ->
|
||||
SearchView
|
||||
|
||||
model_ =
|
||||
{ model | viewMode = nextView }
|
||||
in
|
||||
if result.outcome == Comp.ItemMerge.OutcomeMerged then
|
||||
if result.outcome == Comp.ItemMerge.OutcomeActionDone then
|
||||
update texts
|
||||
bookmarkId
|
||||
lastViewedItemId
|
||||
|
@ -129,8 +129,19 @@ itemPublishView texts settings flags svm =
|
||||
|
||||
itemMergeView : Texts -> UiSettings -> SelectViewModel -> List (Html Msg)
|
||||
itemMergeView texts settings svm =
|
||||
let
|
||||
cfg =
|
||||
{ infoMessage = texts.mergeInfoText
|
||||
, warnMessage = texts.mergeDeleteWarn
|
||||
, actionButton = texts.submitMerge
|
||||
, actionTitle = texts.submitMergeTitle
|
||||
, cancelTitle = texts.cancelMergeTitle
|
||||
, actionSuccessful = texts.mergeSuccessful
|
||||
, actionInProcess = texts.mergeInProcess
|
||||
}
|
||||
in
|
||||
[ Html.map MergeItemsMsg
|
||||
(Comp.ItemMerge.view texts.itemMerge settings svm.mergeModel)
|
||||
(Comp.ItemMerge.view texts.itemMerge cfg settings svm.mergeModel)
|
||||
]
|
||||
|
||||
|
||||
|
Reference in New Issue
Block a user