anchor.diff:  find_spec (Name, Arity, [{spec, [], Specs} |Rest]) ->
       {_, _, [SpecName]}  = lists:keyfind(name, 1, Specs),
       {_, _, [ArityName]} = lists:keyfind(arity, 1, Specs),
  -    case (SpecName =:= Name) and (ArityName =:= Arity) of
  +    case (SpecName == Name) and (ArityName == Arity) of
           false ->
               find_spec(Name, Arity, Rest);
           true  ->
  
positive.code: 
  'keeper?' (X) when is_tuple(X); is_number(X) ->
      true;
  'keeper?' (X) ->
      not lists:all(fun is_whitespace/1, X).
  
  is_whitespace ($\s) -> true;
  
negative.code: htmlchars ([Else|Rest], Acc) -> htmlchars(Rest, [Else    |Acc]).
  
  %% @doc
  %% Parse XML file against OTP's DTD
  -spec read_xml (file:name()) -> {atom(), _, _}.
  read_xml (XmlFile) ->
      ?log("Reading XML for '~s'", [XmlFile]),
      DocgenDir = code:priv_dir(erl_docgen),
      Opts = [ {fetch_path, [ jname(DocgenDir, "dtd")
                            , jname(DocgenDir, "dtd_html_entities") ]}
  