~ruther/guix-local

fbd1c3e95b35b354eb6230843b7e3ae61619cabe — Ludovic Courtès 12 years ago d0c6687
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.
1 files changed, 4 insertions(+), 2 deletions(-)

M gnu/packages/linux-initrd.scm
M gnu/packages/linux-initrd.scm => gnu/packages/linux-initrd.scm +4 -2
@@ 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