anchor.diff:                      ignore -> Acc;
                       NName  -> [ ["fun", App, Mod++":"++NName, Summary] | Acc ]
                   end;
  -            ({name, [{name, Name}, {arity, Arity}], []}, Acc) ->
  +            ({name, [{name,Name}, {arity,Arity}], []}, Acc) ->
  +                [ ["fun", App, Mod++":"++Name++"/"++Arity, Summary] | Acc ];
  +            ({name, [{name,Name}, {arity,Arity}, {clause_i,"1"}], []}, Acc) ->
                   [ ["fun", App, Mod++":"++Name++"/"++Arity, Summary] | Acc ];
               (_Else, Acc) -> Acc
           end,
  
positive.code: 
      Acc = [{ids,[]}, {list,ul}, {functions,[]}, {types,Types}],
  
      {[_Id, _List, {functions,Funs}, {types,_}], NXml}
          = render(fun tr_erlref/2,  Xml, Acc),
  
  %%  XmlFuns = [{li, [], [{a, [{href,"#"++X}], [X]}]}
  
negative.code:                                    , [ {typename,[],_}
                                       , {string,[],S} ] } <- Subtypes]
              end,
              [ {TheSpec,TheName}  %% Continue searching for other clauses
                | find_spec(Name, Arity, Rest) ]
      end;
  find_spec (Name, Arity, [_ | Rest]) ->
      find_spec(Name, Arity, Rest).
  