diff options
| author | Efraim Flashner <efraim@flashner.co.il> | 2017-03-13 23:08:49 +0200 |
|---|---|---|
| committer | Efraim Flashner <efraim@flashner.co.il> | 2017-03-13 23:08:49 +0200 |
| commit | 3f9543aee1e49001d0f80542dd71ba73c44787c7 (patch) | |
| tree | 50ee1bdd53b1e5ec69cb8655f23da79c332dde1e /gnu/system.scm | |
| parent | 864a9590ad948df09f2ad6e9e929608a7587a5f7 (diff) | |
| parent | a71c863834448e2645518b31b60a96ef488dd761 (diff) | |
| download | patches-3f9543aee1e49001d0f80542dd71ba73c44787c7.tar patches-3f9543aee1e49001d0f80542dd71ba73c44787c7.tar.gz | |
Merge remote-tracking branch 'origin/master' into core-updates
Diffstat (limited to 'gnu/system.scm')
| -rw-r--r-- | gnu/system.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gnu/system.scm b/gnu/system.scm index c8d4d014ed..0f52351cf0 100644 --- a/gnu/system.scm +++ b/gnu/system.scm @@ -652,8 +652,8 @@ hardware-related operations as necessary when booting a Linux container." (define (operating-system-root-file-system os) "Return the root file system of OS." (find (match-lambda - (($ <file-system> _ _ "/") #t) - (_ #f)) + (($ <file-system> device title "/") #t) + (x #f)) (operating-system-file-systems os))) (define (operating-system-initrd-file os) |