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

add visual divider between palette and list

Browse source
This commit is contained in:
David Botton 2022-07-03 15:37:32 -04:00
parent a7e6376a81
commit 32f561d408
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
tools/clog-builder.lisp
View file

@ -1071,8 +1071,8 @@ of controls and double click to select control."
:class "w3-border"))
(side-panel (create-panel content :top 0 :right 0 :bottom 0 :width 10))
(sheight (height content))
(divider (create-panel content :top (/ sheight 2) :height 10 :left 0 :right 10))
(control-list (create-panel content :height (- (/ sheight 2) 10) :left 0 :bottom 0 :right 10))
(divider (create-panel content :top (/ sheight 2) :height 5 :left 0 :right 10))
(control-list (create-panel content :height (- (/ sheight 2) 5) :left 0 :bottom 0 :right 10))
(pallete (create-select content)))
(setf (background-color divider) :black)
(setf (background-color content) :gray)