file-systems: Support the 'no-diratime' mount flag.

* gnu/build/file-systems.scm (mount-flags->bit-mask): Handle 'no-diratime'.
* doc/guix.texi (File Systems): Document it.

diff --git a/doc/guix.texi b/doc/guix.texi
index fd8b19f..5c41f21 100644 (file)
--- a/doc/guix.texi
+++ b/doc/guix.texi
@@ -16546,6 +16546,7 @@ This is a list of symbols denoting mount flags.  Recognized flags
 include @code{read-only}, @code{bind-mount}, @code{no-dev} (disallow
 access to special files), @code{no-suid} (ignore setuid and setgid
 bits), @code{no-atime} (do not update file access times),
+@code{no-diratime} (likewise for directories only),
 @code{strict-atime} (update file access time), @code{lazy-time} (only
 update time on the in-memory version of the file inode),
 @code{no-exec} (disallow program execution), and @code{shared} (make the

diff --git a/gnu/build/file-systems.scm b/gnu/build/file-systems.scm
index 0ed5dc5..0d7ff99 100644 (file)
--- a/gnu/build/file-systems.scm
+++ b/gnu/build/file-systems.scm
@@ -1132,6 +1132,8 @@ corresponds to the symbols listed in FLAGS."
        (logior MS_NOEXEC (loop rest)))
       (('no-atime rest ...)
        (logior MS_NOATIME (loop rest)))
+      (('no-diratime rest ...)
+       (logior MS_NODIRATIME (loop rest)))
       (('strict-atime rest ...)
        (logior MS_STRICTATIME (loop rest)))
       (('lazy-time rest ...)