defmodule Islands.TextClient.Summary.Message.Error do
  @moduledoc false

  alias IO.ANSI.Plus, as: ANSI
  alias Islands.Engine.Tally
  alias Islands.TextClient.State

  @spec message(State.t()) :: ANSI.ansilist()
  def message(%State{tally: %Tally{response: {:error, reason}}}) do
    [
      :free_speech_red_background,
      :light_white,
      "ERROR: #{reason |> Atom.to_string() |> String.replace("_", " ")}."
    ]
  end
end