From 3341f8a55d9ed68ba26a5bee68ea20c050c0c461 Mon Sep 17 00:00:00 2001
From: Werner Koch <wk@gnupg.org>
Date: Thu, 20 Dec 2001 13:24:49 +0000
Subject: * keybox-blob.c (_keybox_create_x509_blob): Skip the leading
 parenthesis of the serial number's S-exp.

---
 kbx/keybox-blob.c | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

(limited to 'kbx/keybox-blob.c')

diff --git a/kbx/keybox-blob.c b/kbx/keybox-blob.c
index f3bc859b3..764372c01 100644
--- a/kbx/keybox-blob.c
+++ b/kbx/keybox-blob.c
@@ -824,8 +824,12 @@ _keybox_create_x509_blob (KEYBOXBLOB *r_blob, KsbaCert cert,
       size_t n;
       n = gcry_sexp_canon_len (p, 0, NULL, NULL);
       if (!n)
-        return KEYBOX_General_Error;
+        {
+          xfree (p);
+          return KEYBOX_General_Error;
+        }
       blob->serialbuf = p;
+      p++;
       for (; n && *p != ':'; n--, p++)
         ;
       p++;
-- 
cgit v1.2.3