factor: fix some lines -> read-lines

[factor.git] / extra / mason / git / git.factor

diff --git a/extra/mason/git/git.factor b/extra/mason/git/git.factor
index 6cdcd5fe8a8505b75c1bf23cceb2f7270102d955..e66debb4c76b68e0e5000726ad7e5b43385163c8 100644 (file)
--- a/extra/mason/git/git.factor
+++ b/extra/mason/git/git.factor
@@ -7,7 +7,7 @@ splitting ;
 IN: mason.git
 
 : git-id ( -- id )
-    { "git" "show" } utf8 [ lines ] with-process-reader
+    { "git" "show" } utf8 [ read-lines ] with-process-reader
     first words second ;
 
 <PRIVATE
@@ -57,7 +57,7 @@ IN: mason.git
     { "git" "status" "--porcelain" } ;
 
 : git-status ( -- seq )
-    git-status-cmd utf8 [ lines ] with-process-reader ;
+    git-status-cmd utf8 [ read-lines ] with-process-reader ;
 
 : check-repository ( -- seq )
     "factor" [ git-status ] with-directory ;