Skip to content

Commit ce451e8

Browse files
committed
fix: streamline token loading by removing unnecessary whitespace and refactoring URL parameter parsing
1 parent dd7b6b9 commit ce451e8

File tree

1 file changed

+3
-5
lines changed

1 file changed

+3
-5
lines changed

Project/Sources/Classes/OAuth2Token.4dm

Lines changed: 3 additions & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -49,9 +49,7 @@ Function _loadFromResponse($inResponseString : Text)
4949
var $token : Object:=Try(JSON Parse($inResponseString))
5050

5151
If (($token#Null) && (Not(OB Is empty($token))))
52-
5352
This._loadFromObject({token: $token})
54-
5553
End if
5654

5755

@@ -61,7 +59,9 @@ Function _loadFromResponse($inResponseString : Text)
6159
Function _loadFromURLEncodedResponse($inResponseString : Text)
6260

6361
var $token : Object:={}
64-
var $params : Collection:=Split string($inResponseString; "&")
62+
var $URL : cs.URL:=cs.URL.new()
63+
$URL.parseQuery($inResponseString)
64+
var $params : Collection:=$URL.queryParams
6565
var $iter : Text
6666

6767
For each ($iter; $params)
@@ -72,9 +72,7 @@ Function _loadFromURLEncodedResponse($inResponseString : Text)
7272
End for each
7373

7474
If (Not(OB Is empty($token)))
75-
7675
This._loadFromObject({token: $token})
77-
7876
End if
7977

8078

0 commit comments

Comments
 (0)