anchor.diff:  
   render_docs(Elems,State,Pos,Ind,D) when is_list(Elems) ->
       lists:mapfoldl(fun(Elem,P) ->
  -%                           io:format("Elem: ~p (~p) (~p,~p)~n",[Elem,State,P,Ind]),
  +%%%                           io:format("Elem: ~p (~p) (~p,~p)~n",[Elem,State,P,Ind]),
                              render_docs(Elem,State,P,Ind,D)
                      end,Pos,Elems);
   render_docs(Elem,State,Pos,Ind,D) ->
  
positive.code:             [erl_pp:attribute(maps:get(Type, AllTypes)) || Type <- Types]
      end.
  
  %% Pad N spaces, disabling any ansi formatting while doing so
  pad(N) ->
      Pad = lists:duplicate(N," "),
      case ansi() of
          undefined ->
              Pad;
          Ansi ->
              ["\033[0m",Pad,Ansi]
      end.
  
  get_bullet(_State,latin1) ->
  
negative.code:     if
          NewPos > (Cols - 10 - Ind), Word =/= <<>>, not IsPunct ->
              %% Word does not fit, time to add a newline and also pad to Indent level
              render_words(T,State,WordLength+Ind+1,Ind,[[[nlpad(Ind), Word]]|Acc],Cols);
          true ->
              %% Word does fit on line
              [Line | LineAcc] = Acc,
              %% Add + 1 to length for space
  