defp html_encode(text) do
    [_ | xml] = :xmerl.export_simple([{:xmlText, [], 0, [], text, :text}], :xmerl_xml)
    :erlang.iolist_to_binary(xml)
  end