Use share ui settings

This commit is contained in:
eikek
2022-01-29 10:12:15 +01:00
parent 1ca64f09d1
commit 3710f525d1
8 changed files with 59 additions and 17 deletions

View File

@ -22,6 +22,7 @@ module Api exposing
, changeFolderName
, changePassword
, checkCalEvent
, clientSettingsShare
, confirmMultiple
, confirmOtp
, createChannel
@ -2820,6 +2821,23 @@ itemDetailShare flags token itemId receive =
}
clientSettingsShare : Flags -> String -> (Result Http.Error UiSettings -> msg) -> Cmd msg
clientSettingsShare flags token receive =
let
defaults =
Data.UiSettings.defaults
decoder =
JsonDecode.map (\s -> Data.UiSettings.merge s defaults)
Data.UiSettings.storedUiSettingsDecoder
in
Http2.shareGet
{ url = flags.config.baseUrl ++ "/api/v1/share/clientSettings/webClient"
, token = token
, expect = Http.expectJson receive decoder
}
shareSendMail :
Flags
-> { conn : String, mail : SimpleShareMail }