aboutsummaryrefslogtreecommitdiff
path: root/guix/derivations.scm
diff options
context:
space:
mode:
Diffstat (limited to 'guix/derivations.scm')
-rw-r--r--guix/derivations.scm4
1 files changed, 4 insertions, 0 deletions
diff --git a/guix/derivations.scm b/guix/derivations.scm
index c9db580de6..4ecf85aca2 100644
--- a/guix/derivations.scm
+++ b/guix/derivations.scm
@@ -171,6 +171,10 @@ available in STORE, recursively."
'()
x))
+ ;; The contents of a derivation are typically ASCII, but choosing
+ ;; UTF-8 allows us to take the fast path for Guile's `scm_getc'.
+ (set-port-encoding! drv-port "UTF-8")
+
(let loop ((exp (read drv-port))
(result '()))
(match exp