mirrors/clog
1
Fork 0
mirror of https://github.com/rabbibotton/clog.git synced 2025-12-06 02:30:42 -08:00
Code Issues Projects Releases Wiki Activity

fix scroll issue in repl playground

Browse source
This commit is contained in:
David Botton 2024-05-30 12:22:07 -04:00
parent 0ad5b13463
commit 2343bd6661
1 changed files with 26 additions and 22 deletions
Download patch file Download diff file Expand all files Collapse all files

4
tools/clog-builder-repl.lisp
View file

@ -27,6 +27,10 @@
(repl (create-clog-builder-repl (window-content win))))
(when package
(setf (text-value (package-div repl)) package))
(clog-ace:resize (playground repl))
(set-on-window-size-done win (lambda (obj)
(declare (ignore obj))
(clog-ace:resize (playground repl))))
(set-on-click (create-span (window-icon-area win)
:content (format nil "~A " (code-char #x26F6))
:auto-place :top)