diff options
Diffstat (limited to 'scsh-process.scm')
| -rw-r--r-- | scsh-process.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/scsh-process.scm b/scsh-process.scm index b106bbf..a6d6e0b 100644 --- a/scsh-process.scm +++ b/scsh-process.scm @@ -11,7 +11,7 @@ ;; WARNING: Don't mix with threading unless you're using ;; Chicken 4.8.1 rev 47b5be71 or later. ;; -;;; Copyright (c) 2012-2020, Peter Bex +;;; Copyright (c) 2012-2021, Peter Bex ;; All rights reserved. ; ; Redistribution and use in source and binary forms, with or without @@ -364,7 +364,7 @@ (lambda () (file-close in) (duplicate-fileno out 1) - (with-output-to-port (open-output-file* out) thunk))))) + (with-output-to-port (open-output-file* 1) thunk))))) (file-close out) (open-input-file* in))) |