factor: words -> split-words, lines -> split-lines, fix errors

[factor.git] / basis / present / present.factor

diff --git a/basis/present/present.factor b/basis/present/present.factor
index 6ed7f2831eab97d37fb38f8878cb1974ca1a1379..8b3fd5879d31c28544ebeed533d31524b56e18e8 100644 (file)
--- a/basis/present/present.factor
+++ b/basis/present/present.factor
@@ -31,7 +31,7 @@ M: pathname present string>> ;
 M: callable present
     [ "[ ]" ] [
         [ drop "[ " ]
-        [ [ present ] map unwords ]
+        [ [ present ] map join-words ]
         [ drop " ]" ] tri 3append
     ] if-empty ;