anchor.diff:          when Tag =:= h1;
                Tag =:= h2;
                Tag =:= h3 ->
  -    {fmt, debug(inline, header(Tag, Data))};
  +    {fmt, debug(inline, header(Tag, unwrap_inline(Data)))};
   '#element#'(Tag, Data, _Attrs, _Parents, _E)
           when Tag =:= a;
                Tag =:= code;
  
positive.code:     debug(discarded, {Tag, Data}),
      [].
  
  unwrap_inline({inline, Elements}) when is_list(Elements) -> Elements;
  unwrap_inline(IOList) when is_list(IOList) -> IOList;
  unwrap_inline(BString) when is_binary(BString) -> BString.
  
  debug(Tag, Content) ->
  
negative.code:              Tag =:= expr;
               Tag =:= h4;
               Tag =:= h5;
               Tag =:= h6;
               Tag =:= tt ->
      debug('inline:before', Data),
      {inline, debug('inline:after', [ unwrap_inline(E) || E <- Data ])};
  '#element#'(Tag, Data, _Attrs, _Parents, _E) when
  