From 35066aa596931ef84922298c2760ceba69940cd1 Mon Sep 17 00:00:00 2001
From: Ludovic Courtès <ludo@gnu.org>
Date: Tue, 27 May 2014 22:36:54 +0200
Subject: syscalls: Be more permissive in 'umount' test.

* tests/syscalls.scm ("umount, ENOENT"): Rename to...
  ("umount, ENOENT/EPERM"): ... this.  Accept EPERM as a valid return
  value.
---
 tests/syscalls.scm | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

(limited to 'tests')

diff --git a/tests/syscalls.scm b/tests/syscalls.scm
index 5243ac9a34..ab34fc825b 100644
--- a/tests/syscalls.scm
+++ b/tests/syscalls.scm
@@ -33,13 +33,14 @@
       #f)
     (compose system-error-errno list)))
 
-(test-equal "umount, ENOENT"
-  ENOENT
+(test-assert "umount, ENOENT/EPERM"
   (catch 'system-error
     (lambda ()
       (umount "/does-not-exist")
       #f)
-    (compose system-error-errno list)))
+    (lambda args
+      ;; Both return values have been encountered in the wild.
+      (memv (system-error-errno args) (list EPERM ENOENT)))))
 
 (test-end)
 
-- 
cgit v1.2.3