diff options
| -rw-r--r-- | scsh-process.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/scsh-process.scm b/scsh-process.scm index fd7ff3f..60b9fab 100644 --- a/scsh-process.scm +++ b/scsh-process.scm @@ -219,7 +219,7 @@ (process-execute (maybe->string prog) (map maybe->string args))) (define (fork/pipe #!optional thunk continue-threads?) - (fork/pipe+ '((1 2 0)) thunk continue-threads?)) + (fork/pipe+ '((1 0)) thunk continue-threads?)) ;; Run a thunk and exit 0 after the thunk returns. ;; If an exception occurs, handle it and exit 1. |