anchor.diff:  doc_member(Shard, DocInfo, Opts) ->
       case couch_db:open_doc(Shard, DocInfo, [deleted | Opts]) of
       {ok, Doc} ->
  -        {doc, couch_doc:to_json_obj(Doc, [])};
  +        {doc, couch_doc:to_json_obj(Doc, Opts)};
       Error ->
           Error
       end.
  
positive.code:     [] ->
          {ok, Acc#cacc{seq = Seq, pending = Pending-1}};
      Results ->
          Opts = if Conflicts -> [conflicts]; true -> [] end,
          ChangesRow = {change, [
  	    {pending, Pending-1},
              {seq, {Seq, uuid(Db), owner_of(Seq, Epochs)}},
  
negative.code:         args = #changes_args{
              include_docs = IncludeDocs,
              conflicts = Conflicts,
              filter_fun = Filter,
              doc_options = DocOptions
          },
          pending = Pending,
          epochs = Epochs
  