From 174461eeed92901ae26d6a5814a3b5a4cfa9dca3 Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Wed, 9 Dec 1998 23:00:12 +0000 Subject: [PATCH] . original commit: 68530be47ab12f5963e664c48ce18afb72dd5030 --- src/mred/wrap/mred.ss | 1 + 1 file changed, 1 insertion(+) diff --git a/src/mred/wrap/mred.ss b/src/mred/wrap/mred.ss index b5537630..8217161b 100644 --- a/src/mred/wrap/mred.ss +++ b/src/mred/wrap/mred.ss @@ -4016,6 +4016,7 @@ ((in-parameterization user-parameterization current-error-port) user-output-port) ((in-parameterization user-parameterization current-input-port) (make-input-port (lambda () eof) void void)) ((in-parameterization user-parameterization current-custodian) user-custodian) + ((in-parameterization user-parameterization current-will-executor) (make-will-executor)) (send repl-display-canvas set-editor repl-buffer) (send frame show #t)