Revert "use tilde paths in more places."

[factor.git] / extra / io / files / acls / macosx / macosx-tests.factor

diff --git a/extra/io/files/acls/macosx/macosx-tests.factor b/extra/io/files/acls/macosx/macosx-tests.factor
index 9a65acb364741915b1874c13fe4ffcb0927c9708..e3942e2b6f76dceb98ad16af6c679c54c95ab564 100644 (file)
--- a/extra/io/files/acls/macosx/macosx-tests.factor
+++ b/extra/io/files/acls/macosx/macosx-tests.factor
@@ -4,4 +4,4 @@ USING: io.files.acls.macosx io.pathnames system tools.test ;
 IN: io.files.acls.macosx.tests
 
 { } [ vm-path acls. ] unit-test
-{ } [ "~/Pictures" acls. ] unit-test
+{ } [ home "Pictures" append-path acls. ] unit-test