diff --git a/basis/ui/gadgets/panes/panes.factor b/basis/ui/gadgets/panes/panes.factor index cc2db3ff3b..594c798df8 100644 --- a/basis/ui/gadgets/panes/panes.factor +++ b/basis/ui/gadgets/panes/panes.factor @@ -259,7 +259,9 @@ M: pane-block-stream dispose unnest-pane-stream write-gadget ; M: pane-stream make-block-stream - pane-block-stream new-nested-pane-stream ; + [ pane-block-stream new-nested-pane-stream ] + [ drop page-color swap at* [ background associate ] when ] + 2bi [ ] when* ; ! Tables : apply-table-gap-style ( style grid -- style grid )