audit_to_string.ex

def to_string(r) do
  r
  |> changelist()
  |> Enum.map_join("\n=====\n", &stringify_change/1)
end
  
@spec changelist(term) :: [change_t()]
defp changelist(r = %_{__audit_trail__: audit_trail}) do
  if audit_trail, do: [{r, audit_trail} | changelist(record(audit_trail))], else: []
end

defp changelist(_), do: []

@spec stringify_change(change_t()) :: binary()
defp stringify_change({post, {pre, filename, line}}) do
  diff = Audit.Delta.delta(unaudit_fun(pre), unaudit_fun(post))
  code = Audit.FileCache.get(filename) |> Enum.at(line - 1)
  filename = String.replace_prefix(filename, "#{Audit.Github.git_root()}/", "")
  url = Audit.Github.git_url(filename, line)

  [
    "github url: #{url}",
    "local path: #{filename}:#{line}",
    "code: #{String.trim(code)}",
    "diff: #{inspect(diff)}"
  ]
  |> Enum.join("\n")
end