anchor.diff:  %% anyway
   -spec strip_cos (list()) -> list().
   strip_cos (Index) ->
  -    io:format("WAT ~p", [[{App,X} || X = [_, App |_] <- Index, nomatch /= re:run(App, "^cos") ]]).
  -    [X || X = [_, App |_] <- Index, nomatch == re:run(App, "^cos") ].
  +    [X || X = [_, App |_] <- Index, not lists:prefix("cos", App)].
   
   ensure_docsrc (Conf, AppDir) ->
       % List any doc/src/*.xml files that exist in the source files
  
positive.code: sort_index (A, B) ->
      index_ordering(A) =< index_ordering(B).
  
  html_encode (Str) ->
      re:replace(Str, "'", "", [{return, list}, global]).
  
  javascript_index (Conf, FIndex) ->
  
  
negative.code:               end,
                lists:sort(fun sort_index/2, lists:map(F, FIndex))),
  
      Js = fmt("var index = [~s];",
               [string:join([[C || C <- I, C /= $\n, C /= $\r] || I <- Index], ",")]),
  
      ok = file:write_file([dest(Conf), "/erldocs_index.js"], Js).
  
  