[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
04/04: tests: Relax test on utmpx entries.
From: |
Ludovic Courtès |
Subject: |
04/04: tests: Relax test on utmpx entries. |
Date: |
Sat, 11 Feb 2017 16:28:52 -0500 (EST) |
civodul pushed a commit to branch master
in repository guix.
commit a1a8b7f2e20513a3ad968e74e7ec52546404e3c6
Author: Ludovic Courtès <address@hidden>
Date: Sat Feb 11 22:26:36 2017 +0100
tests: Relax test on utmpx entries.
Partly fixes <http://bugs.gnu.org/25476>.
Reported by Paul Garlick <address@hidden>.
* tests/syscalls.scm ("utmpx-entries"): Check whether ENTRY is of type
'BOOT_TIME', in which case PID may be 0.
---
tests/syscalls.scm | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/tests/syscalls.scm b/tests/syscalls.scm
index 1934704..8db45b4 100644
--- a/tests/syscalls.scm
+++ b/tests/syscalls.scm
@@ -447,7 +447,8 @@
(every (lambda (entry)
(match (utmpx-user entry)
((? string?)
- (> (utmpx-pid entry) 0))
+ (or (eqv? (login-type BOOT_TIME) (utmpx-login-type entry))
+ (> (utmpx-pid entry) 0)))
(#f ;might be DEAD_PROCESS
#t)))
entries))))