We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
2 parents 665f2f2 + 7e5e3a9 commit 2edbabaCopy full SHA for 2edbaba
1 file changed
source/JSONWebToken-OpenSSL.package/JWARSASHA256.class/class/signMessage.withKey..st
@@ -1,6 +1,8 @@
1
sign
2
-signMessage: aString withKey: anObject
+signMessage: message withKey: anObject
3
| pkey sig |
4
pkey := LcEvpPublicKey setRSA: (LcRSA fromPemString: anObject).
5
- sig := pkey digestSignMessage: aString.
+ message pinInMemory.
6
+ sig := [ pkey digestSignMessage: message ]
7
+ ensure: [ message unpinInMemory ].
8
^ sig
0 commit comments