From 4cca91832b3fceed35eb46439fac7c12466d229d Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= Date: Fri, 16 May 2014 10:22:19 +0200 Subject: [PATCH] authenticate: Add compatibility hack for Guile 2.0.5. * guix/scripts/authenticate.scm (%default-port-conversion-strategy): New variable. Reported by Andreas Enge . --- guix/scripts/authenticate.scm | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/guix/scripts/authenticate.scm b/guix/scripts/authenticate.scm index 1b1e0b08ca4f9e8b4de1fb976de6259635fc9868..e9900689faa08ca28ed380af1d6629f15d175e1a 100644 --- a/guix/scripts/authenticate.scm +++ b/guix/scripts/authenticate.scm @@ -81,6 +81,13 @@ to stdout upon success." (canonical-sexp->string subject))) (leave (_ "error: corrupt signature data: ~a~%") (canonical-sexp->string signature))))) + +(define %default-port-conversion-strategy + ;; This fluid is in Guile > 2.0.5. + (if (defined? '%default-port-conversion-strategy) + (@ (guile) %default-port-conversion-strategy) + (make-fluid #f))) + ;;; ;;; Entry point with 'openssl'-compatible interface. We support this