fix one

shikokuchuo · Nov 29, 2023 · 6c49107 · 6c49107
1 parent ba8db3c
commit 6c49107
Show file tree

Hide file tree

Showing 3 changed files with 4 additions and 3 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,7 +1,7 @@
 Package: nanonext
 Type: Package
 Title: NNG (Nanomsg Next Gen) Lightweight Messaging Library
-Version: 0.10.4.9019
+Version: 0.10.4.9020
 Description: R binding for NNG (Nanomsg Next Gen), a successor to ZeroMQ. NNG is
     a socket library implementing 'Scalability Protocols', a reliable,
     high-performance standard for common communications patterns including

diff --git a/NEWS.md b/NEWS.md
@@ -1,4 +1,4 @@
-# nanonext 0.10.4.9019
+# nanonext 0.10.4.9020
 
 *This is a major stability release bundling the 'libnng' v1.6.0 source code.*
 

diff --git a/src/utils.c b/src/utils.c
@@ -263,12 +263,13 @@ SEXP rnng_ncurl(SEXP http, SEXP convert, SEXP follow, SEXP method, SEXP headers,
   if (relo && LOGICAL(follow)[0]) {
     const char *location = nng_http_res_get_header(res, "Location");
     if (location == NULL) goto resume;
-    nng_url_free(url);
+    nng_url *oldurl = url;
     xc = nng_url_parse(&url, location);
     if (xc) goto resume;
     nng_http_res_free(res);
     nng_http_req_free(req);
     nng_http_client_free(client);
+    nng_url_free(oldurl);
     cfg = NULL;
     goto relocall;
   }