mirror of
https://github.com/fluencelabs/fluent-pad
synced 2025-04-24 16:32:13 +00:00
14 lines
421 B
Plaintext
14 lines
421 B
Plaintext
(xor
|
|
(seq
|
|
(call relay ("op" "identity") [])
|
|
(seq
|
|
(call relay (userlist "is_authenticated") [] status)
|
|
(seq
|
|
(call relay (history "add") [msg status.$.["is_authenticated"]!] auth_result)
|
|
(call %init_peer_id% (returnService "run") [auth_result])
|
|
)
|
|
)
|
|
)
|
|
(call %init_peer_id% (returnService "run") [%last_error% status])
|
|
)
|