diff --git a/rtn/OAUTH2.ZAUTHENTICATE.mac b/rtn/OAUTH2.ZAUTHENTICATE.mac index 3b0c7ca..5a07776 100644 --- a/rtn/OAUTH2.ZAUTHENTICATE.mac +++ b/rtn/OAUTH2.ZAUTHENTICATE.mac @@ -96,7 +96,7 @@ ZAUTHENTICATE(ServiceName, Namespace, Username, Password, Credentials, Propertie quit sc } GetCredentials(ServiceName,Namespace,Username,Password,Credentials) Public { - if ServiceName="%Service_WebGateway", $data(%request.Data(##class(%OAuth2.Login).#SessionQueryParameter),state) { + if ServiceName="%Service_WebGateway", $data(%request.Data(##class(%OAuth2.Login).#SessionQueryParameter,1),state) { // Supply user name and password for authentication via a subclass of %OAuth2.Login Set HashedToken = $zcrc(state,7) set Username="OAuth2"_HashedToken