tests: Fix 'guix environment --container' test in the presence of tmpfs.

Reported by Ting-Wei Lan <lantw44@gmail.com>.
This is a followup to 1250034d5a.

* tests/guix-environment-container.sh (mount_test_code): Reverse order
of 'string-prefix?' arguments.
This commit is contained in:
Ludovic Courtès 2016-08-28 16:02:41 +02:00
parent e385e95767
commit 7cdec6a90a
No known key found for this signature in database
GPG Key ID: 090B11993D9AEBB5

View File

@ -72,7 +72,7 @@ mount_test_code="
;; correspond to a parent file system.
((_ mount (or \"tmpfs\" \"proc\" \"sysfs\" \"devtmpfs\"
\"devpts\" \"cgroup\" \"mqueue\") _ _ _)
(and (string-prefix? mount (getcwd))
(and (string-prefix? (getcwd) mount)
mount))
((_ mount _ _ _ _)
mount)))