fix leak

src/exchange/taler-exchange-httpd_refresh_link.c

@@ -59,7 +59,6 @@ struct HTD_Context
  * information for a given coin.  Gets the linkage data and
  * builds the reply for the client.
  *
- *
  * @param cls closure, a `struct HTD_Context`
  * @param transfer_pub public transfer key for the session
  * @param ldl link data related to @a transfer_pub
@@ -84,35 +83,33 @@ handle_link_data (void *cls,
   {
     json_t *obj;
 
-    if (NULL == (obj = json_object ()))
+    obj = json_pack ("{s:o, s:o, s:o}",
-      goto fail;
-    json_object_set_new (obj,
                      "denom_pub",
-                         GNUNET_JSON_from_rsa_public_key (
+                     GNUNET_JSON_from_rsa_public_key
-                           pos->denom_pub.rsa_public_key));
+                       (pos->denom_pub.rsa_public_key),
-    json_object_set_new (obj,
                      "ev_sig",
-                         GNUNET_JSON_from_rsa_signature (
+                     GNUNET_JSON_from_rsa_signature
-                           pos->ev_sig.rsa_signature));
+                       (pos->ev_sig.rsa_signature),
-    json_object_set_new (obj,
                      "link_sig",
                      GNUNET_JSON_from_data_auto (&pos->orig_coin_link_sig));
-    if (0 !=
+    if ( (NULL == obj) ||
+         (0 !=
           json_array_append_new (list,
-                               obj))
+                                 obj)) )
+    {
+      json_decref (list);
       goto fail;
     }
-  if (NULL == (root = json_object ()))
+  }
-    goto fail;
+  root = json_pack ("{s:o, s:o}",
-  json_object_set_new (root,
                     "new_coins",
-                       list);
+                    list,
-  json_object_set_new (root,
                     "transfer_pub",
                     GNUNET_JSON_from_data_auto (transfer_pub));
-  if (0 !=
+  if ( (NULL == root) ||
+       (0 !=
         json_array_append_new (ctx->mlist,
-                             root))
+                               root)) )
     goto fail;
   return;
 fail: