diff --git a/tools/clog-builder-repl.lisp b/tools/clog-builder-repl.lisp
index 69f9262..c2d19fd 100644
--- a/tools/clog-builder-repl.lisp
+++ b/tools/clog-builder-repl.lisp
@@ -8,6 +8,7 @@
                                 :editor-use-console-for-evals t)))
     (set-on-window-can-close win (lambda (obj)
                                    (declare (ignore obj))
+                                   (window-focus win)
                                    (window-focus repl)
                                    nil))
     win))