branch: elpa/slime commit 1a2d6f11a08f1dc8ea9f4879245f3ae014a4df57 Author: Stas Boukarev <stass...@gmail.com> Commit: Stas Boukarev <stass...@gmail.com>
Fix reading from the repl. --- contrib/swank-repl.lisp | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/contrib/swank-repl.lisp b/contrib/swank-repl.lisp index 950b12a0a2..0104eff98d 100644 --- a/contrib/swank-repl.lisp +++ b/contrib/swank-repl.lisp @@ -166,8 +166,9 @@ INPUT OUTPUT IO REPL-RESULTS" (lambda () (shiftf (mconn.repl-thread conn) swank::*main-thread* nil) - (with-bindings *default-worker-thread-bindings* - (repl-loop conn))))) + (swank::with-io-redirection (conn) + (with-bindings *default-worker-thread-bindings* + (repl-loop conn)))))) (setf (mconn.repl-thread conn) (spawn-repl-thread conn "repl-thread"))))) (list (package-name *package*)