anchor.diff:       couchbeam_view:fold(View, DocCollector).
   
   
  --spec fetch_auth_join(couchbeam_server(), db_key()) -> [tuple()]
  +-spec fetch_auth_join(couchbeam:server(), db_key()) -> [tuple()]
                                                       | {not_found, term()}.
   fetch_auth_join(Server, ObjectId) when is_binary(ObjectId) ->
       {ok, Db} = couchbeam:open_db(Server, ?auth_join_db, []),
  
positive.code:          bulk_get/3
           ]).
  
  %% This should include the couchbeam.hrl file and refer to the 'server' record.
  -type couchbeam_server() :: {'server',
  			     string(),
  			     integer(),
  			     string(),
  			     [] | [{atom(),any()}]}.
  -type http_port() :: non_neg_integer().
  -type db_key() :: binary() | string().
  
  
negative.code: 
  -define(gv(Key, PList), proplists:get_value(Key, PList)).
  
  -spec connect() -> couchbeam:server().
  connect() ->
      connect("localhost", 5984).
  
  -spec connect(string(), http_port()) -> couchbeam:server().
  connect(Host, Port) ->
      couchbeam:server_connection(Host, Port, "", []).
  
  -spec fetch_user(couchbeam:server(), db_key()) -> [tuple()]
                                                      | {user_not_found,
                                                         not_in_view}
                                                      | {user_not_found,
  