From 4ef9a5dd5ec07d2cf4326b65d44a9227d184a56e Mon Sep 17 00:00:00 2001
From: Tobias Geerinckx-Rice <me@tobias.gr>
Date: Sun, 26 Feb 2023 01:00:00 +0100
Subject: file-systems: Validate 'no-diratime flag.

This follows up on commit c0773455397746b10194bc14c7cef144f4095b65, and
adds a comment to avoid this in future.

* gnu/system/file-systems.scm (invalid-file-system-flags):
Add 'no-diratime to the list of KNOWN-FLAGS.
---
 gnu/build/file-systems.scm | 1 +
 1 file changed, 1 insertion(+)

(limited to 'gnu/build')

diff --git a/gnu/build/file-systems.scm b/gnu/build/file-systems.scm
index 66ca22d6ea..36a59f5f5c 100644
--- a/gnu/build/file-systems.scm
+++ b/gnu/build/file-systems.scm
@@ -1123,6 +1123,7 @@ (define (mount-flags->bit-mask flags)
   "Return the number suitable for the 'flags' argument of 'mount' that
 corresponds to the symbols listed in FLAGS."
   (let loop ((flags flags))
+    ;; Note: Keep in sync with ‘invalid-file-system-flags’.
     (match flags
       (('read-only rest ...)
        (logior MS_RDONLY (loop rest)))
-- 
cgit v1.2.3