diff options
author | Paul Garlick <pgarlick@tourbillion-technology.com> | 2017-01-30 14:48:37 +0000 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2017-01-31 00:10:44 +0100 |
commit | f18eded8ec4df75444e4feaeb92b3cc1236c2253 (patch) | |
tree | 6940a15be138c269340ed395704d634de3dc2f42 /tests/syscalls.scm | |
parent | af7d72b16c7652e9ddc3c441017de5c9bb9205f2 (diff) | |
download | guix-f18eded8ec4df75444e4feaeb92b3cc1236c2253.tar.gz |
tests: Really skip /var/run/utmpx test when needed.
* tests/syscalls.scm: Change 'test-ski' to 'test-skip'. Signed-off-by: Ludovic Courtès <ludo@gnu.org>
Diffstat (limited to 'tests/syscalls.scm')
-rw-r--r-- | tests/syscalls.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/syscalls.scm b/tests/syscalls.scm index 92e02f3303..1934704375 100644 --- a/tests/syscalls.scm +++ b/tests/syscalls.scm @@ -456,7 +456,7 @@ (eof-object? (read-utmpx (%make-void-port "r")))) (unless (access? "/var/run/utmpx" O_RDONLY) - (tes-skip 1)) + (test-skip 1)) (test-assert "read-utmpx" (let ((result (call-with-input-file "/var/run/utmpx" read-utmpx))) (or (utmpx? result) (eof-object? result)))) |