diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2020-07-20 16:11:24 +0200 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2020-07-20 23:25:09 +0200 |
| commit | 181e0dddd68dc58190bd4831ea5d1ecbd420d83a (patch) | |
| tree | ee825f687ebdb17cfb1484bedc8e138e99420361 /tests/pack.scm | |
| parent | e8088f0b06c2193f2cce04a48aa1350229442a9f (diff) | |
| download | guix-181e0dddd68dc58190bd4831ea5d1ecbd420d83a.tar.gz | |
pack: 'self-contained-tarball' runs derivation in a UTF-8local.
* guix/scripts/pack.scm (self-contained-tarball)
[set-utf8-locale]: New variable.
[build]: Use it.
* tests/pack.scm ("self-contained-tarball"): Use a <profile> record
instead of 'profile-derivation'.
Diffstat (limited to 'tests/pack.scm')
| -rw-r--r-- | tests/pack.scm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/tests/pack.scm b/tests/pack.scm index 0c1406e687..cb7e110d18 100644 --- a/tests/pack.scm +++ b/tests/pack.scm @@ -57,10 +57,10 @@ (unless (network-reachable?) (test-skip 1)) (test-assertm "self-contained-tarball" %store (mlet* %store-monad - ((profile (profile-derivation (packages->manifest - (list %bootstrap-guile)) - #:hooks '() - #:locales? #f)) + ((profile -> (profile + (content (packages->manifest (list %bootstrap-guile))) + (hooks '()) + (locales? #f))) (tarball (self-contained-tarball "pack" profile #:symlinks '(("/bin/Guile" -> "bin/guile")) |