anchor.diff:      meck:new(current_http_client, [passthrough]),
       meck:expect(current_http_client, post, 4,
                   meck:seq([fun (URL, Headers, Body, Opts) ->
  -                                  {ok, {{200, <<"OK">>}, ResponseHeaders, ResponseBody}} =
  -                                       meck:passthrough([URL, Headers, Body, Opts]),
  +                                  {ok, {{200, _}, ResponseHeaders, ResponseBody}} =
  +                                      meck:passthrough([URL, Headers, Body, Opts]),
                                     {Result} = jiffy:decode(ResponseBody),
                                     ?assertEqual(
                                        {[]}, proplists:get_value(<<"UnprocessedKeys">>, Result)),
  
positive.code: retry_with_timeout() ->
      meck:new(current_http_client, [passthrough]),
      meck:expect(current_http_client, post, fun (_, _, _, _) ->
                                              ?debugFmt("called", []),
                                              {error, claim_timeout}
                                   end),
      ?assertEqual({error, max_retries},
                   current:describe_table({[{<<"TableName">>, ?TABLE}]},
                                          [{retries, 3}])),
  
negative.code:       {timeout, 30,  ?_test(retry_with_timeout())},
        {timeout, 30,  ?_test(timeout())},
        {timeout, 30,  ?_test(throttled())},
        {timeout, 30,  ?_test(non_json_error())},
        {timeout, 30,  ?_test(http_client())}
       ]}.
  
  
  