diff --git a/ng/occgeom.tcl b/ng/occgeom.tcl
index 6dea8650..8332899e 100644
--- a/ng/occgeom.tcl
+++ b/ng/occgeom.tcl
@@ -203,7 +203,8 @@ proc occdialog { } {
 	    occdialogbuildtree
 
 	    set hlist [$w.mtre subwidget hlist]
-
+            $hlist configure -selectforeground black
+            $hlist configure -selectbackground grey
 
 	    set solname {""}