[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[bug#49082] [PATCH] guix: gexp: Make UTF-8 a default port encoding in mi
From: |
Andrew Tropin |
Subject: |
[bug#49082] [PATCH] guix: gexp: Make UTF-8 a default port encoding in mixed-text-file |
Date: |
Fri, 18 Jun 2021 07:15:36 +0300 |
guix/gexp.scm (mixed-text-file): It's necessary because if some UTF-8 symbols
appear in configuration, resulting file in the store will contain ? instead of
it.
---
guix/gexp.scm | 1 +
1 file changed, 1 insertion(+)
diff --git a/guix/gexp.scm b/guix/gexp.scm
index afb935761e..187f5c5e85 100644
--- a/guix/gexp.scm
+++ b/guix/gexp.scm
@@ -1921,6 +1921,7 @@ This is the declarative counterpart of 'text-file*'."
(define build
(gexp (call-with-output-file (ungexp output "out")
(lambda (port)
+ (set-port-encoding! port "UTF-8")
(display (string-append (ungexp-splicing text)) port)))))
(computed-file name build))
--
2.32.0