identifier not found "GetJSONValue"

The code below compiled 100% yesterday and after I have upgraded to the latest WebCore version today I get the error: identifier not found "GetJSONValue"

//------------------------------------------------------------------------------
procedure TfrmMain.httpRequestTokenResponse(Sender: TObject; AResponse: string);
var
JS: TJSON;
JA: TJSONArray;

begin
JS := TJSON.Create;
try
JA := TJSONArray(JS.Parse(AResponse));
FDiscordToken := JA.GetJSONValue('access_token');
httpRequestUser.Command := httpGet;
httpRequestUser.Headers.Add('Authorization=Bearer ' + FDiscordToken);
httpRequestUser.URL := DiscordBaseUrl + '/users/@me';
httpRequestUser.Execute;
finally
JS.Free;
end;
end;

There was a mismatch in which TJSONArray descended from TJSONObject. Instead it needed to inherit from TJSONValue. I suppose the parsed JSON is an object not an array? if so, then please convert it to TJSONObject instead