diff --git a/gnu/machine/ssh.scm b/gnu/machine/ssh.scm
index 343cf747484..b5984dc7322 100644
--- a/gnu/machine/ssh.scm
+++ b/gnu/machine/ssh.scm
@@ -1,6 +1,6 @@
 ;;; GNU Guix --- Functional package management for GNU
 ;;; Copyright © 2019 Jakob L. Kreuze <zerodaysfordays@sdf.org>
-;;; Copyright © 2020-2022 Ludovic Courtès <ludo@gnu.org>
+;;; Copyright © 2020-2023 Ludovic Courtès <ludo@gnu.org>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -291,7 +291,10 @@ exist on the machine."
 if any of the modules needed by 'needed-for-boot' file systems in MACHINE are
 not available in the initrd."
   (define file-systems
-    (filter file-system-needed-for-boot?
+    (filter (lambda (file-system)
+              (and (file-system-needed-for-boot? file-system)
+                   (not (member (file-system-type file-system)
+                                %pseudo-file-system-types))))
             (operating-system-file-systems (machine-operating-system machine))))
 
   (define (missing-modules fs)
diff --git a/guix/scripts/system.scm b/guix/scripts/system.scm
index f1154dad33b..acbe3dab2c6 100644
--- a/guix/scripts/system.scm
+++ b/guix/scripts/system.scm
@@ -686,7 +686,10 @@ checking this by themselves in their 'check' procedure."
          (find-partition-by-label (file-system-label->string device))))))
 
   (define file-systems
-    (filter file-system-needed-for-boot?
+    (filter (lambda (file-system)
+              (and (file-system-needed-for-boot? file-system)
+                   (not (member (file-system-type file-system)
+                                %pseudo-file-system-types))))
             (operating-system-file-systems os)))
 
   (for-each (lambda (fs)