Skip to content

Commit

Permalink
Suggested correction for Mac OS/X
Browse files Browse the repository at this point in the history
See issue #179
  • Loading branch information
ThierryGoubier committed Mar 7, 2016
1 parent bfe30af commit a602fe3
Showing 1 changed file with 4 additions and 2 deletions.
Original file line number Diff line number Diff line change
Expand Up @@ -12,14 +12,16 @@ runOSProcessGitCommand: anArrayOfStrings in: aDirectory
c initialStdOut: out writer.
c initialStdErr: err writer.
c pwd: (MCFileTreeFileUtils current directoryPathString: aDirectory).
c := c initialize value.
c := c initialize.
c forkChild.
d := nil.
r := out upToEnd.
[ c update: #runState.
c isComplete ]
whileFalse:
[ (d ifNil: [ d := Delay forMilliseconds: 5 ]) wait.
r := r , out upToEnd ].
c closeStreams.
r := r , out upToEndOfFile.
c succeeded
ifFalse:
Expand All @@ -32,4 +34,4 @@ runOSProcessGitCommand: anArrayOfStrings in: aDirectory
ensure: [ in close.
out close.
err close ].
^ r
^ r

0 comments on commit a602fe3

Please sign in to comment.