linux-boot: Handle nfs-root device strings.

[jackhill/guix/guix.git] / gnu / machine / ssh.scm

diff --git a/gnu/machine/ssh.scm b/gnu/machine/ssh.scm
index 4e31baa..35b42ad 100644 (file)
--- a/gnu/machine/ssh.scm
+++ b/gnu/machine/ssh.scm
@@ -172,6 +172,8 @@ exist on the machine."
               (and (file-system-mount? fs)
                    (not (member (file-system-type fs)
                                 %pseudo-file-system-types))
+                   ;; Don't try to validate network file systems.
+                   (not (string-prefix? "nfs" (file-system-type fs)))
                    (not (memq 'bind-mount (file-system-flags fs)))))
             (operating-system-file-systems (machine-operating-system machine))))