glitch

-module(glitch@api@api_request).
-compile([no_auto_import, nowarn_unused_vars, nowarn_unused_function, nowarn_nomatch]).

-export([from_request/1]).

-spec from_request(gleam@http@request:request(gleam@json:json())) -> gleam@http@request:request(binary()).
from_request(Request) ->
    Body = begin
        _pipe = erlang:element(4, Request),
        gleam@json:to_string(_pipe)
    end,
    _pipe@1 = Request,
    _pipe@2 = gleam@http@request:set_scheme(_pipe@1, https),
    _pipe@3 = gleam@http@request:set_host(
        _pipe@2,
        <<"api.twitch.tv/helix"/utf8>>
    ),
    gleam@http@request:set_body(_pipe@3, Body).