From 1e3fd3bb9ae55b08e951741b6bb17e5e2dd8e493 Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Wed, 16 Mar 2005 21:44:57 +0000 Subject: [PATCH] . original commit: ff85b842b3f17f956ad75d272570ca4328059bbf --- collects/mzlib/process.ss | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/collects/mzlib/process.ss b/collects/mzlib/process.ss index 12c39da..c2ef3b2 100644 --- a/collects/mzlib/process.ss +++ b/collects/mzlib/process.ss @@ -85,7 +85,7 @@ exe args)]) (let ([so (streamify-out cout out #t)] [si (streamify-in cin in #t void)] - [se (streamify-out cerr err #f)] + [se (streamify-out cerr err #t)] [aport (lambda (x) (and (port? x) x))]) (list (aport so)