aboutsummaryrefslogtreecommitdiff
path: root/ide/session.ml
diff options
context:
space:
mode:
authorEnrico Tassi2019-04-09 11:31:45 +0200
committerEnrico Tassi2019-04-09 11:31:45 +0200
commite3e3e6949f1c80abec9942ee0d258b58e5a7d382 (patch)
treedf3a99ba22ef7c934a5e8cb2e7d9360a8c79fcc2 /ide/session.ml
parent0ec0512b63574c9e2190780217f7c006603ea8af (diff)
parentdf91339e6b1da481b5cbb4db48a205a7a1bc906b (diff)
Merge PR #9928: Fix #9812: CoqIDE on gtk3 has wrong defaults for selection BG.
Reviewed-by: gares
Diffstat (limited to 'ide/session.ml')
-rw-r--r--ide/session.ml7
1 files changed, 4 insertions, 3 deletions
diff --git a/ide/session.ml b/ide/session.ml
index fd21515ca5..90412f53f0 100644
--- a/ide/session.ml
+++ b/ide/session.ml
@@ -257,9 +257,10 @@ let make_table_widget ?sort cd cb =
~model:store ~packing:frame#add () in
let () = data#set_headers_visible true in
let () = data#set_headers_clickable true in
- let refresh clr = data#misc#modify_bg [`NORMAL, `NAME clr] in
- let _ = background_color#connect#changed ~callback:refresh in
- let _ = data#misc#connect#realize ~callback:(fun () -> refresh background_color#get) in
+(* FIXME: handle this using CSS *)
+(* let refresh clr = data#misc#modify_bg [`NORMAL, `NAME clr] in *)
+(* let _ = background_color#connect#changed ~callback:refresh in *)
+(* let _ = data#misc#connect#realize ~callback:(fun () -> refresh background_color#get) in *)
let mk_rend c = GTree.cell_renderer_text [], ["text",c] in
let cols =
List.map2 (fun (_,c) (_,n,v) ->