diff options
| author | Benutzer <u@exefce> | 2017-12-08 13:55:43 +0100 |
|---|---|---|
| committer | Peter Bex <peter@more-magic.net> | 2017-12-09 12:23:41 +0100 |
| commit | e9f13148358a250b72a7ddae932c828235eeb9ab (patch) | |
| tree | 5032a75ff79617f5b9bf88cbaf735a638b1d74a3 | |
| parent | afed169a7ae9b1957169390127ccd617fed62716 (diff) | |
| download | scsh-process-e9f13148358a250b72a7ddae932c828235eeb9ab.tar.gz | |
Do not redirect stderr to stdin in fork/pipe.
Signed-off-by: Peter Bex <peter@more-magic.net>
| -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. |