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

[factor.git] / basis / tools / ps / macosx / macosx.factor

diff --git a/basis/tools/ps/macosx/macosx.factor b/basis/tools/ps/macosx/macosx.factor
index eecb31cbdda86138dd086da6560debeb60ec1994..6c75d9ca4d46419a337367073a13c4d8f05b80cb 100644 (file)
--- a/basis/tools/ps/macosx/macosx.factor
+++ b/basis/tools/ps/macosx/macosx.factor
@@ -139,7 +139,7 @@ STRUCT: kinfo_proc
     [ kinfo_proc memory>struct ] map ;
 
 : ps-arg ( kp_proc -- arg )
-    [ p_pid>> args rest unwords ] [
+    [ p_pid>> args rest join-words ] [
         drop p_comm>> 0 over index [ head ] when* >string
     ] recover ;