mirror of
https://git.savannah.gnu.org/git/guix.git
synced 2026-04-06 13:10:33 +02:00
environment: Provide a writable /run/user/$UID.
* guix/scripts/environment.scm (launch-environment/container): Add /run/user/UID to ‘file-systems’. * tests/guix-environment-container.sh: Test it. Change-Id: I44c70a7554a06f40d073c25929ea7c6ded356d08
This commit is contained in:
@@ -875,6 +875,11 @@ WHILE-LIST."
|
||||
reqs)))
|
||||
(file-systems (append %container-file-systems
|
||||
(list tmpfs ; RW /tmp
|
||||
(file-system ; RW /run
|
||||
(inherit tmpfs)
|
||||
(mount-point
|
||||
(string-append "/run/user/"
|
||||
(number->string uid))))
|
||||
(file-system ; RW ~
|
||||
(device "none")
|
||||
(mount-point
|
||||
|
||||
@@ -203,6 +203,9 @@ guix environment --bootstrap --container --ad-hoc guile-bootstrap \
|
||||
guix environment --bootstrap --container --ad-hoc guile-bootstrap \
|
||||
-- guile -c '(mkdir (string-append (getenv "HOME") "/foo"))'
|
||||
|
||||
# And /run too!
|
||||
guix environment --bootstrap --container --ad-hoc guile-bootstrap \
|
||||
-- guile -c '(mkdir "/run/user/1000/shepherd")'
|
||||
|
||||
# Check the exit code.
|
||||
|
||||
|
||||
Reference in New Issue
Block a user