anchor.diff:                                   ds_stats:get_samples(Stats),
                                    ReportCfg),
       Page = {html, [],
  -            [{body, [{link, ?COLOR_LINK},
  +            [{head, [],
  +              [{meta, [{'http-equiv', "Content-Type"},
  +                       {content, "text/html; charset=UTF-8"}], []}]},
  +             {body, [{link, ?COLOR_LINK},
                        {alink, ?COLOR_LINK},
                        {vlink, ?COLOR_LINK}],
                 [{font, [{size, "-1"}],
  
positive.code: 
  html_test() ->
      ?assertEqual("<br>", html(br)),
      ?assertEqual("<body></body>", html({body, [], []})),
      ?assertEqual("<table width=\"100%\" cellspacing=\"0\">"
                   "<tr bgcolor=\"#123456\">"
                   "<td align=\"left\">Cell</td>"
  
negative.code: html({raw, Str}) -> Str;
  html({str, Str}) -> html_encode(Str);
  html({term, Term}) ->
      RawStr = io_lib:format("~80tp", [Term]),
      Str = nl_encode(linewrap(html_encode(RawStr), 82)),
      html({code, [], [{raw, Str}]});
  html(Tags) when is_list(Tags) -> lists:concat([html(T) || T <- Tags]);
  