anchor.diff:  fun_stuff (App, Mod, {func, [], Child}) ->
       case lists:keyfind(fsummary, 1, Child) of
           {fsummary, [], Xml} ->
  -            Summary = string:substr(xml_to_str(Xml), 1, 50);
  +            Summary = string:substr(xml_to_html(Xml), 1, 50);
           false ->
               Summary = ""
               %% Things like 'ose_erl_driver.xml' (C drivers) don't have fsummary
  
positive.code:     Args = [ {base,    Base}
             , {search_base, "../"}
             , {title,   Mod ++ " (" ++ App ++ ") - "}
             , {content, xml_to_str(NXml)}
  %%         , {funs,    xml_to_str({ul, [{id,"funs"}], XmlFuns})}
             , {ga,      kf(ga,Conf)} ],
  
      {ok, Data} = erldocs_dtl:render(Args),
  
negative.code:     ?log("Creating index.html ..."),
  
      Html = "<h1>Module Index</h1><hr/><br/><div>"
          ++      xml_to_html(emit_index(Index))
          ++ "</div>",
      Args = [ {base,    kf(base,Conf)}
             , {search_base, "./"}
  