aboutsummaryrefslogtreecommitdiff
path: root/gnu/tests
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2017-01-16 22:33:46 +0100
committerLudovic Courtès <ludo@gnu.org>2017-01-16 23:27:23 +0100
commit384344198dcaa97847e66d3dd82f279ede08d690 (patch)
treeaca75459dd314be54a8e10bfda5403a96634debe /gnu/tests
parentb91cfa22e1b9f3e5d3a62ee65ee71a6e708b9b53 (diff)
downloadguix-384344198dcaa97847e66d3dd82f279ede08d690.tar
guix-384344198dcaa97847e66d3dd82f279ede08d690.tar.gz
file-systems: 'file-system-needed-for-boot?' is #t for parents of the store.
Suggested by John Darrington <john@darrington.wattle.id.au>. * gnu/system/file-systems.scm (%not-slash): New variable. (file-prefix?): New procedure. (file-system-needed-for-boot?): Use it to check whether FS holds the store. * tests/file-systems.scm ("file-system-needed-for-boot?"): New test. * gnu/tests/install.scm (%separate-store-os)[file-systems]: Remove 'needed-for-boot?' field for "/gnu".
Diffstat (limited to 'gnu/tests')
-rw-r--r--gnu/tests/install.scm5
1 files changed, 2 insertions, 3 deletions
diff --git a/gnu/tests/install.scm b/gnu/tests/install.scm
index ae54154c5c..4e8d594054 100644
--- a/gnu/tests/install.scm
+++ b/gnu/tests/install.scm
@@ -1,5 +1,5 @@
;;; GNU Guix --- Functional package management for GNU
-;;; Copyright © 2016 Ludovic Courtès <ludo@gnu.org>
+;;; Copyright © 2016, 2017 Ludovic Courtès <ludo@gnu.org>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -257,8 +257,7 @@ build (current-guix) and then store a couple of full system images.")
(device "store-fs")
(title 'label)
(mount-point "/gnu")
- (type "ext4")
- (needed-for-boot? #t)) ;definitely!
+ (type "ext4"))
%base-file-systems))
(users %base-user-accounts)
(services (cons (service marionette-service-type