core: Add words/unwords/unwords-as and use them.

[factor.git] / basis / unicode / normalize / normalize-tests.factor

diff --git a/basis/unicode/normalize/normalize-tests.factor b/basis/unicode/normalize/normalize-tests.factor
index 71f0a4f7ef31cd0aac184862a0015da69125dda1..a97fc42231e92560502627917a02804211aaba03 100644 (file)
--- a/basis/unicode/normalize/normalize-tests.factor
+++ b/basis/unicode/normalize/normalize-tests.factor
@@ -34,7 +34,7 @@ IN: unicode.normalize.tests
     values [
         [
             "#@" split first [ CHAR: \s = ] trim-tail ";" split harvest
-            [ " " split [ hex> ] "" map-as ] map
+            [ words [ hex> ] "" map-as ] map
         ] map
     ] map concat ;