tests: git: Write files as UTF-8.
* guix/tests/git.scm (populate-git-repository): Add call to 'set-port-encoding!' in 'add' case.
This commit is contained in:
parent
fdafd40432
commit
e1b8bace8c
@ -73,6 +73,7 @@ Return DIRECTORY on success."
|
||||
(mkdir-p (dirname file))
|
||||
(call-with-output-file file
|
||||
(lambda (port)
|
||||
(set-port-encoding! port "UTF-8")
|
||||
(display (if (string? contents)
|
||||
contents
|
||||
(with-repository directory repository
|
||||
|
Loading…
Reference in New Issue
Block a user