anchor.diff:  %% Parse header paragraf text
   convert(<<Char:8, Rest/binary>>, State = #{state     := Tag,
                                              currToken := CT})
  -    when (Tag == h6) or (Tag == h5) or (Tag == h4) or
  -         (Tag == h3) or (Tag == h2) or (Tag == h1) ->
  +  when (Tag == h6) or (Tag == h5) or (Tag == h4) or
  +       (Tag == h3) or (Tag == h2) or (Tag == h1) ->
       convert(Rest, State#{currToken := <<CT/binary, Char:8>>});
   
   %% Paragraf text ending
  
positive.code:                                            currToken := CT,
                                             currLine  := CL,
                                             prevLine  := <<>>}) ->
              convert(Rest, State#{prevLine  := <<CL/binary>>,
                                   currLine  := <<>>,
                                   currToken := <<CT/binary, 13, 10>>});
  convert(<<13, 10, Rest/binary>>, State = #{state     := ptext,
                                             prevLine  := PL,
                                             currLine  := CL,
  
negative.code:                                         currLine  := CL,
                                          currToken := CT,
                                          soFar     := Html})
    when (CL == <<>>)     or
         (CL == <<" ">>)  or
         (CL == <<"  ">>) or
         (CL == <<"   ">>) ->
      case headerStart(<<"#", Rest/binary>>) of
          {true, Tag, Rest2} ->
              BinTag = makeTag(p, CT),
  