correct renaming of the console window and refocus on new project on project window

This commit is contained in:
David Botton 2024-04-25 20:59:46 -04:00
parent 1806cfb4a1
commit 4af2cf6a0e
2 changed files with 4 additions and 2 deletions

View file

@ -9,6 +9,7 @@
(let* ((win (on-open-file obj :title "CLOG Builder Console"
:is-console t
:editor-use-console-for-evals t)))
(setf (clog-ace:mode (window-param win)) "ace/mode/plain_text")
(set-on-window-can-close win (lambda (obj)
(setf (hiddenp obj) t)
nil))