gu

-module(examples@text_info).
-compile([no_auto_import, nowarn_unused_vars, nowarn_unused_function, nowarn_nomatch]).

-export([main/0]).

-spec main() -> {ok, {ok, binary()} | {error, {integer(), binary()}}} |
    {error, {integer(), binary()}}.
main() ->
    _pipe = [<<"zenity"/utf8>>],
    _pipe@1 = gu:new_text_info(_pipe, none, true, none, none, false),
    _pipe@2 = gu:set_title(_pipe@1, <<"Text Info"/utf8>>),
    _pipe@3 = gu:prompt(_pipe@2),
    gleam@result:map(_pipe@3, fun(Answer) -> _pipe@4 = [<<"zenity"/utf8>>],
            _pipe@5 = gu:new_info(_pipe@4),
            _pipe@6 = gu:set_text(_pipe@5, Answer),
            _pipe@7 = gu:set_timeout(_pipe@6, 10),
            gu:show(_pipe@7, true) end).