nixo
/
guix-devel
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

gnu: linux-initrd: Mount /tmp as a tmpfs. 

* gnu/packages/linux-initrd.scm (gnu-system-initrd): Make sure /root/tmp
  exists; mount it as a tmpfs.
This commit is contained in:
Ludovic Courtès 2013-09-27 00:33:15 +02:00
parent d0c66871b1
commit fbd1c3e95b
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
gnu/packages/linux-initrd.scm
View File

@ -363,8 +363,7 @@ the Linux kernel.")
(make-essential-device-nodes) (make-essential-device-nodes)
;; Prepare the real root file system under /root. ;; Prepare the real root file system under /root.
(unless (file-exists? "/root") (mkdir-p "/root")
(mkdir "/root"))
(if root (if root
;; Assume ROOT has a usable /dev tree. ;; Assume ROOT has a usable /dev tree.
(mount root "/root" "ext3") (mount root "/root" "ext3")
@ -374,6 +373,9 @@ the Linux kernel.")
(mount-essential-file-systems #:root "/root") (mount-essential-file-systems #:root "/root")
(mkdir-p "/root/tmp")
(mount "none" "/root/tmp" "tmpfs")
;; XXX: We don't copy our fellow Guile modules to /root (see ;; XXX: We don't copy our fellow Guile modules to /root (see
;; 'qemu-initrd'), so if TO-LOAD tries to load a module (which can ;; 'qemu-initrd'), so if TO-LOAD tries to load a module (which can
;; happen if it throws, to display the exception!), then we're ;; happen if it throws, to display the exception!), then we're