anchor.diff:  
                   riakc_pid :: pid()
               }).
  +
  +-type state() :: #state{}.
   
   %%%===================================================================
   %%% API
  
positive.code: %% API
  -export([start_link/3,
           get_active_manifest/1,
           add_new_manifest/2,
           update_manifest/2,
           mark_active_as_pending_delete/1,
  
negative.code:             {NotFound, State}
      end.
  
  -spec specific_manifest(binary(), state()) ->
      {{error, notfound}, state()} | {{ok, lfs_manifest()}, state()}.
  specific_manifest(UUID, State=#state{bucket=Bucket,
                                       key=Key,
                                       riakc_pid=RiakcPid}) ->
  
      case get_manifests(RiakcPid, Bucket, Key) of
          {ok, RiakObject, Resolved} ->
              try orddict:fetch(UUID, Resolved) of
                  Value ->
                      {{ok, Value}, State#state{riak_object=RiakObject,
                                                manifests=Resolved}}
                  catch error:function_clause ->
                      {{error, notfound}, State}
              end;
          {error, notfound}=NotFound ->
              {NotFound, State}
      end.
  
  %% @doc
  -spec get_manifests(pid(), binary(), binary()) ->
      {ok, term(), term()} | {error, notfound}.
  