summary refs log tree commit diff
diff options
context:
space:
mode:
authorRicardo Wurmus <rekado@elephly.net>2018-04-17 12:48:48 +0200
committerRicardo Wurmus <rekado@elephly.net>2018-04-17 12:59:59 +0200
commit8d3dda021a4cc66f79305a2146c895d1613a8ba6 (patch)
treef6c83368b06c089d988283c53911b6d8066cc405
parent82bead7537d395507071489979576bfc0be44f73 (diff)
downloadguix-8d3dda021a4cc66f79305a2146c895d1613a8ba6.tar.gz
gnu: r-rcurl: Respect CURL_CA_BUNDLE variable.
Fixes <https://debbugs.gnu.org/31189>

* gnu/packages/statistics.scm (r-rcurl)[arguments]: Patch options to respect
CURL_CA_BUNDLE if no "cainfo" option is provided.
-rw-r--r--gnu/packages/statistics.scm12
1 files changed, 12 insertions, 0 deletions
diff --git a/gnu/packages/statistics.scm b/gnu/packages/statistics.scm
index 62d8b2b2c2..cb839a85a3 100644
--- a/gnu/packages/statistics.scm
+++ b/gnu/packages/statistics.scm
@@ -2734,6 +2734,18 @@ engine (version 3.8.8.2) is included.")
                 "0l7qi45jxlf898n0jazabnam1yyczvqfdknd00bdirhhiplpd1sc"))))
     (properties `((upstream-name . "RCurl")))
     (build-system r-build-system)
+    (arguments
+     `(#:phases
+       (modify-phases %standard-phases
+         (add-after 'unpack 'respect-CURL_CA_BUNDLE
+           (lambda _
+             (substitute* "R/options.S"
+               (("\\.els = rev\\(merge\\(list\\(\\.\\.\\.\\), \\.opts\\)\\)" m)
+                (string-append "\
+certs = Sys.getenv(\"CURL_CA_BUNDLE\")
+if (certs != \"\") { .opts = merge.list(.opts, list(cainfo=certs)) }
+" m)))
+             #t)))))
     (inputs
      `(("libcurl" ,curl)))
     (propagated-inputs