perl version oddity
[exim.git] / src / src / pdkim / signing.c
index 07737ab4115c699e087fc8b6f145efc473b95bf7..e72d4b53edefd8f10f098b3d452db6e36b303a55 100644 (file)
@@ -1,6 +1,6 @@
 /*
  *  PDKIM - a RFC4871 (DKIM) implementation
- *  Copyright (c) The Exim Maintainers 1995 - 2022
+ *  Copyright (c) The Exim Maintainers 1995 - 2023
  *  SPDX-License-Identifier: GPL-2.0-or-later
  *
  *  signing/verification interface
@@ -419,7 +419,7 @@ if (  !(s1 = Ustrstr(CS privkey_pem, "-----BEGIN RSA PRIVATE KEY-----"))
 
 *s2 = '\0';
 
-if ((rc = b64decode(s1, &der.data) < 0))
+if ((rc = b64decode(s1, &der.data, s1) < 0))
   return US"Bad PEM-DER b64 decode";
 der.len = rc;