steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

mason.git: fix status check.

db4
John Benediktsson 2014-12-30 19:29:05 -08:00
parent d0dde922bd
commit ee8be0a8dd
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
extra/mason/git/git.factor
View File

@ -65,7 +65,7 @@ IN: mason.git
: git-status ( -- seq ) : git-status ( -- seq )
[ [
git-status-cmd utf8 [ lines ] with-process-reader* git-status-cmd utf8 [ lines ] with-process-reader*
{ 0 1 } member? [ 2drop ] [ process-failed ] if { 0 1 } member? [ drop ] [ process-failed ] if
[ "#\t" head? ] filter [ "#\t" head? ] filter
] [ git-status-failed { } ] recover ; ] [ git-status-failed { } ] recover ;