tests: Really skip /var/run/utmpx test when needed.
authorPaul Garlick <pgarlick@tourbillion-technology.com>
Mon, 30 Jan 2017 14:48:37 +0000 (14:48 +0000)
committerLudovic Courtès <ludo@gnu.org>
Mon, 30 Jan 2017 23:10:44 +0000 (00:10 +0100)
* tests/syscalls.scm: Change 'test-ski' to 'test-skip'.

Signed-off-by: Ludovic Courtès <ludo@gnu.org>
tests/syscalls.scm

index 92e02f3..1934704 100644 (file)
   (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))))