anchor.diff:      ErrType = couch_util:get_value(<<"error">>, InnerJson),
       ?_assertEqual(<<"unauthorized">>,ErrType).
   
  -should_allow_admin_db_view_cleanup(Url) ->
  +should_allow_admin_db_view_cleanup([Url,UsersUrl]) ->
       ?_assertEqual(true,
           begin
               {ok, _, _, ResultBody} = test_request:post(Url ++ "/_view_cleanup",
  
positive.code:             couch_util:get_value(<<"ok">>, InnerJson, undefined)
          end).
  
  should_disallow_anonymous_db_view_cleanup(Url) ->
      {ok, _, _, ResultBody} = test_request:post(Url ++ "/_view_cleanup",
          [?CONTENT_JSON], ""),
      ResultJson = ?JSON_DECODE(ResultBody),
  
negative.code:         }
      }.
  
  should_allow_admin_db_compaction([Url,UsersUrl]) ->
      ?_assertEqual(true,
          begin
              {ok, _, _, ResultBody} = test_request:post(Url ++ "/_compact",
  