From 27c3afa940693376fd1a2a55602f4af9f53798b6 Mon Sep 17 00:00:00 2001
From: Ricardo Wurmus <rekado@elephly.net>
Date: Fri, 27 Mar 2020 23:36:33 +0100
Subject: gnu: r-curl: Fix patch to respect CURL_CA_BUNDLE.

Fixes <https://debbugs.gnu.org/40262>.

* gnu/packages/cran.scm (r-curl)[arguments]: Ensure CURLOPT_CAINFO actually
gets set.
---
 gnu/packages/cran.scm | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/cran.scm b/gnu/packages/cran.scm
index 573630ff69..759b9263f3 100644
--- a/gnu/packages/cran.scm
+++ b/gnu/packages/cran.scm
@@ -677,7 +677,11 @@ LaTeX.")
                (("if \\(!grepl\\(\"mingw\".*")
                 "if (FALSE)\n"))
              (substitute* "src/handle.c"
-               (("#ifdef _WIN32") "#if 1"))
+               (("/\\* Only set" m)
+                (string-append "\
+const char *_ca_bundle = getenv(\"CURL_CA_BUNDLE\");
+if(_ca_bundle != NULL) { curl_easy_setopt(handle, CURLOPT_CAINFO, _ca_bundle); }
+" m)))
              #t)))))
     (inputs
      `(("libcurl" ,curl)
-- 
cgit v1.2.3