anchor.diff:  delete_user_from_handle_service(HSID, UID, {RestAddress, Headers, Options}) ->
       Address = <<(list_to_binary(RestAddress))/binary, "/handle_services/", HSID/binary, "/users/", UID/binary>>,
       Response = do_request(Address, Headers, delete, <<>>, Options),
  -    get_body_map(Response).
  +    get_response_status(Response).
   
   add_group_to_handle_service(HSID, UID, {RestAddress, Headers, Options}) ->
       Address = <<(list_to_binary(RestAddress))/binary, "/handle_services/", HSID/binary, "/groups/", UID/binary>>,
       Response = do_request(Address, Headers, put, <<>>, Options),
  -    get_body_map(Response).
  +    get_response_status(Response).
   
   list_groups_of_handle_service(HSID, {RestAddress, Headers, Options}) ->
       Address = <<(list_to_binary(RestAddress))/binary, "/handle_services/", HSID/binary, "/groups/">>,
  
positive.code: register_provider(URLS, RedirectionPoint, ClientName, Config, ReqParams) ->
      register_provider(undefined, undefined, URLS, RedirectionPoint, ClientName, Config, ReqParams).
  
  register_provider(Latitude, Longitude, URLS, RedirectionPoint, ClientName, Config, {RestAddress, Headers, _Options}) ->
      {KeyFile, CSRFile, CertFile} = ?config(cert_files, Config),
      {ok, CSR} = file:read_file(CSRFile),
      Params = [
  
negative.code:     PrivilegesJson = json_utils:encode_map(Privileges),
      Address = <<(list_to_binary(RestAddress))/binary, "/handle_services/", HSID/binary, "/users/", UID/binary, "/privileges">>,
      Response = do_request(Address, Headers, put, PrivilegesJson, Options),
      get_response_status(Response).
  
  get_group_privileges_for_handle_service(HSID, UID, {RestAddress, Headers, Options}) ->
      Address = <<(list_to_binary(RestAddress))/binary, "/handle_services/", HSID/binary, "/groups/", UID/binary, "/privileges">>,
  