anchor.diff:  end_per_testcase(_, Config) ->
       sqerl:adhoc_delete("clients", all),
       sqerl:adhoc_delete("users", all),
  +    Config.
  +
  +make_admin_non_admin_and_client(Config) ->
  +    make_user(Config, ?ADMIN_USER_NAME, ?ADMIN_AUTHZ_ID),
  +    make_user(Config, ?USER_NAME, ?USER_AUTHZ_ID),
  +    make_client(Config, ?CLIENT_NAME),
  +    Config.
  +
  +make_admin_and_client(Config) ->
  +    make_user(Config, ?ADMIN_USER_NAME, ?ADMIN_AUTHZ_ID),
  +    make_client(Config, ?CLIENT_NAME),
       Config.
   
   http_keys_request(Method, Type, Requestor) ->
  
positive.code:      list_client_no_keys,
       list_user_no_keys,
       post_user_new_valid_key,
       post_client_new_valid_key
       ].
  
  %% Test cases.
  
negative.code:     %chef_db:fetch(#chef_user{username = ?ADMIN_USER_NAME}, context()),
      Config;
  init_per_testcase(post_client_new_valid_key, Config) ->
      make_admin_and_client(Config);
  init_per_testcase(post_conflicting_client_key, Config) ->
      make_admin_and_client(Config);
  init_per_testcase(post_multiple_valid_client_keys, Config) ->
      make_admin_and_client(Config);
  init_per_testcase(post_user_new_valid_key, Config) ->
      make_admin_non_admin_and_client(Config);
  init_per_testcase(post_key_with_invalid_date, Config) ->
      make_admin_non_admin_and_client(Config);
  init_per_testcase(post_key_with_infinity_date, Config) ->
      make_admin_non_admin_and_client(Config);
  init_per_testcase(post_key_with_invalid_key_name, Config) ->
      make_admin_non_admin_and_client(Config);
  init_per_testcase(post_key_with_invalid_public_key, Config) ->
      make_admin_non_admin_and_client(Config);
  init_per_testcase(post_conflicting_user_key, Config) ->
      make_admin_non_admin_and_client(Config);
  init_per_testcase(post_multiple_valid_user_keys, Config) ->
      make_admin_non_admin_and_client(Config);
  init_per_testcase(_, Config) ->
      Config.
  
  