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

Default value for input-dialogs

Browse source
This commit is contained in:
David Botton 2022-01-09 19:52:44 -05:00
parent 755dd08503
commit cebb81f061
2 changed files with 30 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

1
tools/clog-builder.lisp
View file

@ -376,6 +376,7 @@
(setf panel-name result)
(setf (attribute content "data-lisp-name") panel-name)
(setf (window-title win) panel-name)))
:default-value panel-name
:title "Panel Properties")))
(set-on-window-close win
(lambda (obj)