mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-12-25 22:08:16 -05:00
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
1 changed files with 1 additions and 0 deletions
|
@ -73,6 +73,7 @@ (define (git command . args)
|
||||||
(mkdir-p (dirname file))
|
(mkdir-p (dirname file))
|
||||||
(call-with-output-file file
|
(call-with-output-file file
|
||||||
(lambda (port)
|
(lambda (port)
|
||||||
|
(set-port-encoding! port "UTF-8")
|
||||||
(display (if (string? contents)
|
(display (if (string? contents)
|
||||||
contents
|
contents
|
||||||
(with-repository directory repository
|
(with-repository directory repository
|
||||||
|
|
Loading…
Reference in a new issue