diff --git a/tools/clog-builder.lisp b/tools/clog-builder.lisp index b5caae5..e6f813a 100644 --- a/tools/clog-builder.lisp +++ b/tools/clog-builder.lisp @@ -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)