ui.gadgets.search-tables: Fix background color of color-table

diff --git a/basis/ui/gadgets/search-tables/search-tables.factor b/basis/ui/gadgets/search-tables/search-tables.factor
index 78c21ad2ab9dd07b6cf3699468ebace668131418..437d2e05ddad85a5c373674993ae465acfb6b967 100644 (file)
--- a/basis/ui/gadgets/search-tables/search-tables.factor
+++ b/basis/ui/gadgets/search-tables/search-tables.factor
@@ -32,6 +32,7 @@ TUPLE: search-field < track field ;
         { 5 5 } >>gap
         +baseline+ >>align
         swap <model-field> 10 >>min-cols "Search" >>default-text
+        white-interior
         [ >>field ] keep 1 track-add
         dup <clear-button> f track-add ;
 
@@ -53,7 +54,7 @@ M: search-field handle-gesture
         dup field>> { 2 2 } <filled-border> f track-add
         values search quot <string-search>
         renderer <table> f >>takes-focus? >>table
-        dup table>> <scroller> 1 track-add ; inline
+        dup table>> white-interior <scroller> 1 track-add ; inline
 
 M: search-table model-changed
     nip field>> clear-search-field ;