--- a/ColorMenu.st	Tue Dec 04 09:23:13 2007 +0100
+++ b/ColorMenu.st	Wed Dec 05 10:21:03 2007 +0100
@@ -90,7 +90,7 @@
     aTitle isEmptyOrNil ifTrue:[ label := labels at:1 ifAbsent:defLabel ]
                        ifFalse:[ label := aTitle ].
 
-    label := Text string:label foregroundColor:fgColor backgroundColor:bgColor.
+    label := Text string:(' ', label, ' ') foregroundColor:fgColor backgroundColor:bgColor.
     item  := MenuItem labeled:label.
     submenu addItem:item.
 
@@ -104,7 +104,7 @@
                                      ifFalse:[ fgColor := Color black ].
 
             label := labels at:idx ifAbsent:defLabel.
-            label := Text string:label foregroundColor:fgColor backgroundColor:aBgColor.
+            label := Text string:(' ', label, ' ') foregroundColor:fgColor backgroundColor:aBgColor.
             item  := MenuItem labeled:label.
             item argument:aBgColor.
             
@@ -207,7 +207,7 @@
                     label isNil ifTrue:[
                         label := getColSel, ' ', el printString.
                     ].
-                    subItem := MenuItem label:'Color ', label.
+                    subItem := MenuItem label:' Color ', label, ' '.
                     subItem argument:color.
                     submenu addItem:subItem.
                 ].
@@ -477,5 +477,5 @@
 !ColorMenu class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/ColorMenu.st,v 1.39 2007-12-04 08:23:13 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/ColorMenu.st,v 1.40 2007-12-05 09:21:03 ca Exp $'
 ! !