file-systems: 'mount-file-system' preserves the right mount flags.
authorLudovic Courtès <ludovic.courtes@inria.fr>
Wed, 10 Mar 2021 17:58:41 +0000 (18:58 +0100)
committerLudovic Courtès <ludo@gnu.org>
Wed, 10 Mar 2021 22:21:33 +0000 (23:21 +0100)
commitb665dd4a9902b5722b9e06fd89c203e2221b19e0
treed8f5fc6ac22059c9f4a97f3bdecac06763618584
parent9a6ea2f8dc5222018768861a2328e7683e1973c9
file-systems: 'mount-file-system' preserves the right mount flags.

Fixes <https://bugs.gnu.org/47007>.
Reported by Jelle Licht <jlicht@fsfe.org>.

Since commit dcb640f02b1f9590c3bd4301a22bf31bd60c56d4, we could end up
applying the wrong mount flags because the (find ...) expression could
pick the "wrong" mount point in the presence of bind mounts.

* gnu/build/file-systems.scm (mount-file-system): Use 'statfs' to
compute FLAGS whe FS is a bind mount.
gnu/build/file-systems.scm