gexp: 'mixed-text-file' UTF-8-encodes its output.
* guix/gexp.scm (mixed-text-file)[build]: Call 'set-port-encoding!'. Signed-off-by: Ludovic Courtès <ludo@gnu.org>master
parent
57d4fc7b1a
commit
1f3d7b4534
|
@ -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))
|
||||
|
|
Reference in New Issue