diff options
author | Eric Bavier <bavier@cray.com> | 2017-12-04 10:33:31 -0600 |
---|---|---|
committer | Eric Bavier <bavier@member.fsf.org> | 2017-12-10 15:58:55 -0600 |
commit | 7f04197fef905790fd392f8d686d00ae95a0d04c (patch) | |
tree | 5d22127f1e2a84a7d61bc721e209aece95113f00 | |
parent | d53fb678a72a83401f0495b458bd0dcc6428d364 (diff) | |
download | guix-7f04197fef905790fd392f8d686d00ae95a0d04c.tar guix-7f04197fef905790fd392f8d686d00ae95a0d04c.tar.gz |
utils: Fix cond-expand for Guile 2.0.
* guix/build/download.scm (tls-wrap): Use 'guile-2.2' feature instead.
-rw-r--r-- | guix/build/download.scm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/guix/build/download.scm b/guix/build/download.scm index 4490d225e6..609a100538 100644 --- a/guix/build/download.scm +++ b/guix/build/download.scm @@ -308,10 +308,10 @@ host name without trailing dot." (register-tls-record-port record port) ;; Write HTTP requests line by line rather than byte by byte: - ;; <https://bugs.gnu.org/22966>. This is not possible on Guile 2.0. + ;; <https://bugs.gnu.org/22966>. This is possible with Guile >= 2.2. (cond-expand - (guile-2.0 #f) - (else (setvbuf record 'line))) + (guile-2.2 (setvbuf record 'line)) + (else #f)) record))) |