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

project tree controls

Browse source
This commit is contained in:
David Botton 2024-05-05 20:55:54 -04:00
parent 358b4b1309
commit 7a3f0ddace
9 changed files with 135 additions and 70 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -11,7 +11,9 @@
(win (create-gui-window obj :title "ASD Project Window"
:top 60 :left 325
:width 643 :height 625
:has-pinner t :client-movement *client-side-movement*)))
:has-pinner t
:keep-on-top t
:client-movement *client-side-movement*)))
(create-projects (window-content win))
(setf (project-win app) win)
(set-on-window-close win (lambda (obj)