anchor.diff:      case lists:any(fun(#att{data=Data})-> Data /= stub end, Atts) of
       true ->
           WriteFun([<<"--", Boundary/binary,
  -                "\r\ncontent-type: application/json\r\n\r\n">>,
  +                "\r\nContent-Type: application/json\r\n\r\n">>,
                   JsonBytes, <<"\r\n--", Boundary/binary>>]),
           atts_to_mp(Atts, Boundary, WriteFun, SendEncodedAtts);
       false ->
  
positive.code:                 AccAttsSize +
                  4 + % "\r\n\r\n"
                  case SendEncodedAtts of
                  true ->
                      Att#att.att_len;
                  _ ->
                      Att#att.disk_len
                  end +
                  4 + % "\r\n--"
                  size(Boundary)
              end
          end, 0, Atts),
      if AttsSize == 0 ->
  
negative.code:     fold_streamed_data(RcvFun, LenLeft - size(Bin), Fun, ResultAcc).
  
  len_doc_to_multi_part_stream(Boundary, JsonBytes, Atts, SendEncodedAtts) ->
      AttsSize = lists:foldl(fun(Att, AccAttsSize) ->
              #att{
                  data=Data,
                  name=Name,
                  att_len=AttLen,
                  disk_len=DiskLen,
                  type=Type,
                  encoding=Encoding
              } = Att,
              case Data of
              stub ->
                  AccAttsSize;
  