anchor.diff:      do_request(delete, get_base_url() ++ "/" ++ ?b2l(TestAuthDb)),
       lists:foreach(fun (DbName) ->
           delete_db(DbName)
  -    end, all_dbs()),
  -    config:delete("admins", ?ADMIN_USERNAME).
  +    end, all_dbs()).
   
   set_config(Section, Key, Value) ->
       Url = lists:concat([
  
positive.code: -define(ADMIN_USERNAME, "admin").
  -define(ADMIN_PASSWORD, "secret").
  
  start_couch() ->
      test_util:start_couch([chttpd]).
  
  stop_couch(TestCtx) ->
      test_util:stop_couch(TestCtx).
  
  setup() ->
      TestAuthDb = ?tempdb(),
      config:set("admins", ?ADMIN_USERNAME, ?ADMIN_PASSWORD),
      do_request(put, get_base_url() ++ "/" ++ ?b2l(TestAuthDb)),
      set_config("couch_httpd_auth", "authentication_db", ?b2l(TestAuthDb)),
      set_config("couchdb_peruser", "enable", "true"),
  
negative.code:         "couchdb_peruser test",
          {
              setup,
              fun setup_all/0, fun teardown_all/1,
              {
                  foreach,
                  fun setup/0, fun teardown/1,
  