summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMaxim Cournoyer <maxim.cournoyer@gmail.com>2020-02-24 11:08:42 -0500
committerMaxim Cournoyer <maxim.cournoyer@gmail.com>2020-03-02 23:59:45 -0500
commit85a7466e22d345444f952b57346f4c09de020c1f (patch)
tree72c98d1c1ed4877d638cf741e0cfb45d60e18245
parent99e676db43389af3a9e4c21734987c086fcaa8ed (diff)
downloadpatches-85a7466e22d345444f952b57346f4c09de020c1f.tar
patches-85a7466e22d345444f952b57346f4c09de020c1f.tar.gz
build: file-systems: Do not warn about file system check for NFS.
* gnu/build/file-systems.scm (check-file-system): Define a dummy checker procedure for NFS that always passes to prevent a warning from being emitted.
-rw-r--r--gnu/build/file-systems.scm2
1 files changed, 2 insertions, 0 deletions
diff --git a/gnu/build/file-systems.scm b/gnu/build/file-systems.scm
index ee6375515f..902563b219 100644
--- a/gnu/build/file-systems.scm
+++ b/gnu/build/file-systems.scm
@@ -5,6 +5,7 @@
;;; Copyright © 2019 Guillaume Le Vaillant <glv@posteo.net>
;;; Copyright © 2019 Tobias Geerinckx-Rice <me@tobias.gr>
;;; Copyright © 2019 David C. Trudgian <dave@trudgian.net>
+;;; Copyright © 2020 Maxim Cournoyer <maxim.cournoyer@gmail.com>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -581,6 +582,7 @@ were found."
((string-prefix? "btrfs" type) check-btrfs-file-system)
((string-suffix? "fat" type) check-fat-file-system)
((string-prefix? "jfs" type) check-jfs-file-system)
+ ((string-prefix? "nfs" type) (const 'pass))
(else #f)))
(if check-procedure