Fix comments

Author: darjoo

src/System Application/Test/Cryptography Management/src/RSATest.Codeunit.al

@@ -242,14 +242,15 @@ codeunit 132617 "RSA Test"
 
         // [WHEN] Decrypt encrypted text stream using OAEP Padding
         DecryptingTempBlob.CreateOutStream(DecryptedOutStream);
-        DecryptionFailed := not TryDecrypt(RSA, PrivateKeyXmlStringSecret, EncryptedInStream, true, DecryptedOutStream);
+        DecryptionFailed := not TryDecryptWithOaepPadding(RSA, PrivateKeyXmlStringSecret, EncryptedInStream, DecryptedOutStream);
 
         // [THEN] Either decryption fails with an exception, or the decrypted text is garbage (not equal to plaintext)
         if not DecryptionFailed then begin
             DecryptingTempBlob.CreateInStream(DecryptedInStream);
             DecryptedText := Base64Convert.FromBase64(Base64Convert.ToBase64(DecryptedInStream));
-            LibraryAssert.AreNotEqual(PlainText, DecryptedText, 'Decryption with wrong padding should fail or return garbage data.');
-        end;
+            LibraryAssert.AreNotEqual(PlainText, DecryptedText, 'Decryption failed with garbage data.');
+        end else
+            LibraryAssert.IsTrue(DecryptionFailed, 'Decryption failed with wrong padding.');
     end;
 
     [Test]
@@ -283,20 +284,27 @@ codeunit 132617 "RSA Test"
 
         // [WHEN] Decrypt encrypted text stream using PKCS#1 padding.
         DecryptingTempBlob.CreateOutStream(DecryptedOutStream);
-        DecryptionFailed := not TryDecrypt(RSA, PrivateKeyXmlStringSecret, EncryptedInStream, false, DecryptedOutStream);
+        DecryptionFailed := not TryDecrypt(RSA, PrivateKeyXmlStringSecret, EncryptedInStream, DecryptedOutStream);
 
         // [THEN] Either decryption fails with an exception, or the decrypted text is garbage (not equal to plaintext)
         if not DecryptionFailed then begin
             DecryptingTempBlob.CreateInStream(DecryptedInStream);
             DecryptedText := Base64Convert.FromBase64(Base64Convert.ToBase64(DecryptedInStream));
-            LibraryAssert.AreNotEqual(PlainText, DecryptedText, 'Decryption with wrong padding should fail or return garbage data.');
-        end;
+            LibraryAssert.AreNotEqual(PlainText, DecryptedText, 'Decryption failed with garbage data.');
+        end else
+            LibraryAssert.IsTrue(DecryptionFailed, 'Decryption failed with wrong padding.');
     end;
 
     [TryFunction]
-    local procedure TryDecrypt(RSA: Codeunit RSA; XmlString: SecretText; EncryptedInStream: InStream; OaepPadding: Boolean; DecryptedOutStream: OutStream)
+    local procedure TryDecryptWithOaepPadding(RSA: Codeunit RSA; XmlString: SecretText; EncryptedInStream: InStream; DecryptedOutStream: OutStream)
     begin
-        RSA.Decrypt(XmlString, EncryptedInStream, OaepPadding, DecryptedOutStream);
+        RSA.Decrypt(XmlString, EncryptedInStream, true, DecryptedOutStream);
+    end;
+
+    [TryFunction]
+    local procedure TryDecrypt(RSA: Codeunit RSA; XmlString: SecretText; EncryptedInStream: InStream; DecryptedOutStream: OutStream)
+    begin
+        RSA.Decrypt(XmlString, EncryptedInStream, false, DecryptedOutStream);
     end;
 
     local procedure SaveRandomTextToOutStream(OutStream: OutStream) PlainText: Text