noordstar
/
elm-matrix-sdk-beta
mirror of https://github.com/noordstar/elm-matrix-sdk-beta
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Finish addAccessToken function

pull/24/head
Bram 2024-05-27 23:47:37 +02:00
parent 567ac5596a
commit 12c919b071
1 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
src/Matrix.elm
View File

@ -1,7 +1,7 @@
module Matrix exposing module Matrix exposing
( Vault ( Vault
, VaultUpdate, update , VaultUpdate, update
, sendMessageEvent, fromUserId , sendMessageEvent, fromUserId, addAccessToken
) )
{-| {-|
@ -29,7 +29,7 @@ support a monolithic public registry. (:
## Debugging ## Debugging
@docs sendMessageEvent @docs addAccessToken, sendMessageEvent
-} -}
@ -58,7 +58,8 @@ type alias VaultUpdate =
addAccessToken : String -> Vault -> Vault addAccessToken : String -> Vault -> Vault
addAccessToken token (Vault vault) = addAccessToken token (Vault vault) =
Envelope.mapContext (\c -> { c | suggestedAccessToken = Just token }) vault
|> Vault
{-| Use a fully-fledged Matrix ID to connect. {-| Use a fully-fledged Matrix ID to connect.