diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2013-09-27 00:33:15 +0200 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2013-09-27 00:46:17 +0200 |
| commit | fbd1c3e95b35b354eb6230843b7e3ae61619cabe (patch) | |
| tree | 7cabdd83033c405bd260051e00ef98384701d9c8 | |
| parent | d0c66871b12c491eca6a80c09b836f893c1d4234 (diff) | |
| download | gnu-guix-fbd1c3e95b35b354eb6230843b7e3ae61619cabe.tar gnu-guix-fbd1c3e95b35b354eb6230843b7e3ae61619cabe.tar.gz | |
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.
| -rw-r--r-- | gnu/packages/linux-initrd.scm | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/gnu/packages/linux-initrd.scm b/gnu/packages/linux-initrd.scm index b62843aadd..ed30fa56b1 100644 --- a/gnu/packages/linux-initrd.scm +++ b/gnu/packages/linux-initrd.scm @@ -363,8 +363,7 @@ the Linux kernel.") (make-essential-device-nodes) ;; Prepare the real root file system under /root. - (unless (file-exists? "/root") - (mkdir "/root")) + (mkdir-p "/root") (if root ;; Assume ROOT has a usable /dev tree. (mount root "/root" "ext3") @@ -374,6 +373,9 @@ the Linux kernel.") (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 ;; 'qemu-initrd'), so if TO-LOAD tries to load a module (which can ;; happen if it throws, to display the exception!), then we're |