anchor.diff:  convert(<<13, 10, Rest/binary>>, State = #{state     := Tag,
                                              currToken := CT,
                                              soFar     := Html})
  -    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) ->
       BinTag = makeTag(Tag, CT),
       Html2  = <<Html/binary, BinTag/binary>>,
       convert(Rest, State#{state     := ptext,
  
positive.code: %% 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) ->
      convert(Rest, State#{currToken := <<CT/binary, Char:8>>});
  
  %% Paragraf text ending
  
negative.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,
  