diff --git a/extra/mason/common/common.factor b/extra/mason/common/common.factor
index d5996f300c..dfda85e4d7 100644
--- a/extra/mason/common/common.factor
+++ b/extra/mason/common/common.factor
@@ -51,7 +51,7 @@ SYMBOL: stamp
     with-directory ;
 
 : git-id ( -- id )
-    { "git" "show" } utf8 <process-reader> [ readln ] with-input-stream
+    { "git" "show" } utf8 [ readln ] with-process-reader
     " " split second ;
 
 : ?prepare-build-machine ( -- )