diff options
author | Marius Bakke <mbakke@fastmail.com> | 2019-03-10 18:47:02 +0100 |
---|---|---|
committer | Marius Bakke <mbakke@fastmail.com> | 2019-03-10 18:47:02 +0100 |
commit | 96ab233df7eefd4c868a9e9628b834458e9f18d3 (patch) | |
tree | ee28a833f9126245d394bf5b2674c7ced3a3bba8 /gnu/tests | |
parent | b4d7689f9255b93b9ea02e01dc490f1416f77782 (diff) | |
parent | a4de1a651e75c9b9d5e6bdb993f5bd5f74875d49 (diff) | |
download | gnu-guix-96ab233df7eefd4c868a9e9628b834458e9f18d3.tar gnu-guix-96ab233df7eefd4c868a9e9628b834458e9f18d3.tar.gz |
Merge branch 'staging' into core-updates
Diffstat (limited to 'gnu/tests')
-rw-r--r-- | gnu/tests/base.scm | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/gnu/tests/base.scm b/gnu/tests/base.scm index cc8b273c98..f9390ee8e4 100644 --- a/gnu/tests/base.scm +++ b/gnu/tests/base.scm @@ -258,6 +258,12 @@ info --version") (operating-system-user-accounts os)))) (stat:perms (marionette-eval `(stat ,root-home) marionette)))) + (test-equal "ownership and permissions of /var/empty" + '(0 0 #o555) + (let ((st (marionette-eval `(stat "/var/empty") marionette))) + (list (stat:uid st) (stat:gid st) + (stat:perms st)))) + (test-equal "no extra home directories" '() |