Current section
Files
Jump to
Current section
Files
src/glitch.erl
-module(glitch).
-compile([no_auto_import, nowarn_unused_vars, nowarn_unused_function, nowarn_nomatch]).
-export([main/0]).
-spec main() -> {ok, nil} | {error, binary()}.
main() ->
gleam@result:'try'(
dot_env_ffi:get_env(<<"CLIENT_ID"/utf8>>),
fun(Client_id) ->
gleam@result:'try'(
dot_env_ffi:get_env(<<"ACCESS_TOKEN"/utf8>>),
fun(Access_token) ->
Client_options = {options, Client_id, Access_token},
Client = fun(Field@0) -> {client, Field@0} end(
Client_options
),
Send_message_request = {send_message_request,
<<"209286766"/utf8>>,
<<"209286766"/utf8>>,
<<"Hello Twitter from Glitch and Gleam!"/utf8>>,
none},
_assert_subject = glitch@api@chat:send_message(
Client,
Send_message_request
),
{ok, _} = case _assert_subject of
{ok, _} -> _assert_subject;
_assert_fail ->
erlang:error(#{gleam_error => let_assert,
message => <<"Assertion pattern match failed"/utf8>>,
value => _assert_fail,
module => <<"glitch"/utf8>>,
function => <<"main"/utf8>>,
line => 23})
end,
{ok, nil}
end
)
end
).