Browse Source

* Fix debug statement

Michaël Van Canneyt 1 year ago
parent
commit
d5807e03b6
1 changed files with 1 additions and 1 deletions
  1. 1 1
      packages/fcl-hash/src/fppem.pp

+ 1 - 1
packages/fcl-hash/src/fppem.pp

@@ -169,7 +169,7 @@ begin
   ASNParsePemSection(Buffer, List, _BEGIN_EC_PRIVATE_KEY, _END_EC_PRIVATE_KEY);
   if List.Count < 7 then
     Exit;
-  Writeln(List.Text);
+//  Writeln(List.Text);
   CurveOID := List.Strings[4];
   Result := (CurveOID=ASN_secp256r1);
 end;