diff options
author | Ludovic Courtès <ludovic.courtes@inria.fr> | 2019-08-27 11:27:02 +0200 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2019-08-27 12:20:44 +0200 |
commit | 7979a287f8eb84cbbfa44629951572408939a756 (patch) | |
tree | b72f53ded5b000c90323be5306978648021264b5 /tests | |
parent | 2b7c89f4fcc5e1607e153939d54d32aeaf494ca9 (diff) | |
download | gnu-guix-7979a287f8eb84cbbfa44629951572408939a756.tar gnu-guix-7979a287f8eb84cbbfa44629951572408939a756.tar.gz |
pack: Create /tmp in Docker images.
Fixes <https://bugs.gnu.org/37161>.
* guix/scripts/pack.scm (docker-image)[build]: Add a 'directory' entry
for "/tmp" to DIRECTIVES.
* tests/pack.scm ("docker-image + localstatedir"): Test the presence of /tmp.
* gnu/tests/docker.scm (run-docker-test)["Load docker image and run
it"]: Test the presence and permission bits of "/tmp".
Diffstat (limited to 'tests')
-rw-r--r-- | tests/pack.scm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/tests/pack.scm b/tests/pack.scm index ea88cd89f2..71ff5aec18 100644 --- a/tests/pack.scm +++ b/tests/pack.scm @@ -169,6 +169,7 @@ (when (and (file-exists? (string-append bin "/guile")) (file-exists? "var/guix/db/db.sqlite") + (file-is-directory? "tmp") (string=? (string-append #$%bootstrap-guile "/bin") (pk 'binlink (readlink bin))) (string=? (string-append #$profile "/bin/guile") |