diff --git a/extra/mason/git/git.factor b/extra/mason/git/git.factor index 71a71b6ccb..15737831b3 100644 --- a/extra/mason/git/git.factor +++ b/extra/mason/git/git.factor @@ -55,7 +55,7 @@ IN: mason.git ] [ rethrow ] if ; : with-process-reader* ( desc encoding quot -- ) - [ ] dip swap [ with-input-stream ] dip + [ (process-reader) ] dip swap [ with-input-stream ] dip dup wait-for-process dup { 0 1 } member? [ 2drop ] [ process-failed ] if ; inline