core: fix sequences test

Test join not join-words

diff --git a/core/sequences/sequences-tests.factor b/core/sequences/sequences-tests.factor
index a99a6b0622ab79a18d68b8b65f64c1c77f04a727..61ca2d6e802a3ede954663fe1c968315c2290c67 100644 (file)
--- a/core/sequences/sequences-tests.factor
+++ b/core/sequences/sequences-tests.factor
@@ -96,7 +96,7 @@ IN: sequences.tests
 { 4 V{ 1 2 3 } } [ 4 V{ 1 4 2 5 3 6 } [ dupd > ] filter! ] unit-test
 
 { "hello world how are you" }
-[ { "hello" "world" "how" "are" "you" } join-words ] unit-test
+[ { "hello" "world" "how" "are" "you" } " " join ] unit-test
 
 { "hello world how are you" }
 [ { "hello" "world" "how" "are" "you" } " " "" join-as ] unit-test