Allow to confirm/unconfirm multiple items

This commit is contained in:
Eike Kettner
2020-10-29 23:15:38 +01:00
parent ab50792879
commit 6a16d8afc7
3 changed files with 62 additions and 1 deletions

View File

@ -10,6 +10,7 @@ module Api exposing
, changeFolderName
, changePassword
, checkCalEvent
, confirmMultiple
, createImapSettings
, createMailSettings
, createNewFolder
@ -107,6 +108,7 @@ module Api exposing
, startReIndex
, submitNotifyDueItems
, toggleTags
, unconfirmMultiple
, updateNotifyDueItems
, updateScanMailbox
, upload
@ -1284,6 +1286,34 @@ getJobQueueStateTask flags =
--- Item (Mulit Edit)
confirmMultiple :
Flags
-> Set String
-> (Result Http.Error BasicResult -> msg)
-> Cmd msg
confirmMultiple flags ids receive =
Http2.authPut
{ url = flags.config.baseUrl ++ "/api/v1/sec/items/confirm"
, account = getAccount flags
, body = Http.jsonBody (Api.Model.IdList.encode (IdList (Set.toList ids)))
, expect = Http.expectJson receive Api.Model.BasicResult.decoder
}
unconfirmMultiple :
Flags
-> Set String
-> (Result Http.Error BasicResult -> msg)
-> Cmd msg
unconfirmMultiple flags ids receive =
Http2.authPut
{ url = flags.config.baseUrl ++ "/api/v1/sec/items/unconfirm"
, account = getAccount flags
, body = Http.jsonBody (Api.Model.IdList.encode (IdList (Set.toList ids)))
, expect = Http.expectJson receive Api.Model.BasicResult.decoder
}
setTagsMultiple :
Flags
-> ItemsAndRefs