summary refs log tree commit diff
path: root/gnu/system/install.scm
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2016-03-24 21:22:56 +0100
committerLudovic Courtès <ludo@gnu.org>2016-03-24 22:47:15 +0100
commitee03b75dfb3399f41002c38ac512473ab94afa74 (patch)
treee450a4ca5a599c363701b6db5c5e5fb2d83a1135 /gnu/system/install.scm
parentcc7234aede8d736d7f8f088e5955c468b9f480dc (diff)
downloadguix-ee03b75dfb3399f41002c38ac512473ab94afa74.tar.gz
install: Add /tmp as a tmpfs.
Fixes <http://bugs.gnu.org/23056>.
Reported by Michael Downey <shaggy814@yandex.com>
and Kei <kei@openmailbox.org>.

* gnu/system/install.scm (installation-os)[file-systems]: Add "/tmp".
Diffstat (limited to 'gnu/system/install.scm')
-rw-r--r--gnu/system/install.scm26
1 files changed, 19 insertions, 7 deletions
diff --git a/gnu/system/install.scm b/gnu/system/install.scm
index d6434fd00d..7a363cac8e 100644
--- a/gnu/system/install.scm
+++ b/gnu/system/install.scm
@@ -340,17 +340,29 @@ Use Alt-F2 for documentation.
     (file-systems
      ;; Note: the disk image build code overrides this root file system with
      ;; the appropriate one.
-     (cons (file-system
-             (mount-point "/")
-             (device "gnu-disk-image")
-             (title 'label)
-             (type "ext4"))
-           %base-file-systems))
+     (cons* (file-system
+              (mount-point "/")
+              (device "gnu-disk-image")
+              (title 'label)
+              (type "ext4"))
+
+            ;; Make /tmp a tmpfs instead of keeping the unionfs.  This is
+            ;; because FUSE creates '.fuse_hiddenXYZ' files for each open file,
+            ;; and this confuses Guix's test suite, for instance.  See
+            ;; <http://bugs.gnu.org/23056>.
+            (file-system
+              (mount-point "/tmp")
+              (device "none")
+              (title 'device)
+              (type "tmpfs")
+              (check? #f))
+
+            %base-file-systems))
 
     (users (list (user-account
                   (name "guest")
                   (group "users")
-                  (supplementary-groups '("wheel"))  ; allow use of sudo
+                  (supplementary-groups '("wheel")) ; allow use of sudo
                   (password "")
                   (comment "Guest of GNU")
                   (home-directory "/home/guest"))))