anchor.diff:  get(Pid, Bucket, Key, Options, Timeout) ->
       {T, B} = maybe_bucket_type(Bucket),
       Req = get_options(Options, #rpbgetreq{type =T, bucket = B, key = Key}),
  -    gen_server:call(Pid, {req, Req, Timeout}, infinity).
  +    call_infinity(Pid, {req, Req, Timeout}).
   
   %% @doc Put the metadata/value in the object under bucket/key
   %% @equiv put(Pid, Obj, [])
  
positive.code:     {T, B} = maybe_bucket_type(Bucket),
      Req = delete_options(Options, #rpbdelreq{type = T, bucket = B, key = Key,
              vclock=VClock}),
      gen_server:call(Pid, {req, Req, Timeout}, infinity).
  
  
  %% @doc Delete the riak object.
  
negative.code:             none -> ?DEFAULT_PB_TIMEOUT;
              ST -> ST
          end,
      call_infinity(Pid, {req, #rpblistbucketsreq{timeout=ServerTimeout},
                          ServerTimeout}).
  
  
  %% @doc List all keys in a bucket
  