anchor.diff:  %% Spaces functions ===========================================================
   
   %% create space for user
  -create_space(Name, ReqParams) ->
  -    {RestAddress, Headers, Options} = ReqParams,
  +create_space(Name, {RestAddress, Headers, Options}) ->
       Body = json_utils:encode([
           {<<"name">>, Name}
       ]),
  
positive.code:     Address = RestAddress ++ "/groups/" ++ EncodedPGID ++ "/nested/" ++ EncodedGID ++ "/privileges",
      do_request(Address, Headers, put, Body, Options).
  
  get_group_spaces(GID, ReqParams) ->
      {RestAddress, Headers, Options} = ReqParams,
      EncodedGID = binary_to_list(http_utils:url_encode(GID)),
      Response = do_request(RestAddress ++ "/groups/" ++ EncodedGID ++ "/spaces", Headers, get, [], Options),
      Val = get_body_val([spaces], Response),
      fetch_value_from_list(Val).
  
  get_space_info_by_group(GID, SID, ReqParams) ->
      {RestAddress, Headers, Options} = ReqParams,
      EncodedGID = binary_to_list(http_utils:url_encode(GID)),
      EncodedSID = binary_to_list(http_utils:url_encode(SID)),
      Address = RestAddress ++ "/groups/" ++ EncodedGID ++ "/spaces/" ++ EncodedSID,
      Response = do_request(Address, Headers, get, [], Options),
      get_body_val([spaceId, name], Response).
  
  create_space_for_group(Name, GID, ReqParams) ->
      {RestAddress, Headers, Options} = ReqParams,
      Body = json_utils:encode([
          {<<"name">>, Name}
      ]),
  
negative.code:     get_header_val(<<"spaces">>, Response).
  
  %% create space for user/group who delivers token
  create_space(Token, Name, Size, {RestAddress, Headers, Options}) ->
      Body = json_utils:encode([
          {<<"name">>, Name},
          {<<"token">>, Token},
  