io.standard-paths.unix: fix tests on arch linux.

db4
John Benediktsson 2014-03-11 11:37:00 -07:00
parent 0fd53ac54c
commit 0a2e632d4c
1 changed files with 10 additions and 4 deletions

View File

@ -1,8 +1,14 @@
! Copyright (C) 2011 Doug Coleman.
! See http://factorcode.org/license.txt for BSD license.
USING: io.standard-paths io.standard-paths.unix tools.test ;
USING: io.standard-paths io.standard-paths.unix sequences
tools.test ;
IN: io.standard-paths.unix.tests
[ f ] [ "" find-in-path ] unit-test
[ "/bin/ls" ] [ "ls" find-in-path ] unit-test
[ "/sbin/ifconfig" ] [ "ifconfig" find-in-path ] unit-test
{ f } [ "" find-in-path ] unit-test
{ t } [
"ls" find-in-path { "/bin/ls" "/usr/bin/ls" } member?
] unit-test
{ t } [
"ifconfig" find-in-path
{ "/sbin/ifconfig" "/usr/bin/ifconfig" } member?
] unit-test