--- a/ColorMenu.st	Wed May 27 15:50:30 2009 +0200
+++ b/ColorMenu.st	Thu May 28 08:37:26 2009 +0200
@@ -224,28 +224,28 @@
 "/ nil                         "/ separator
         #(  red
             red:
-            #( veryLight lightened 100 87 67 50 33)
+            #( veryLight lightened 100 87 67 50 33 25)
          )
         #(  green
             green:
-            #( veryLight lightened 100 87 67 50 33)
+            #( veryLight lightened 100 87 67 50 33 25)
          )
         #(  blue
             blue:
-            #( veryLight lightened 100 87 67 50 33)
+            #( veryLight lightened 100 87 67 50 33 25)
          )
 "/ nil                         "/ separator
         #(  cyan
             cyan:
-            #( veryLight lightened 100 87 67 50 33)
+            #( veryLight lightened 100 87 67 50 33 25)
         )
         #(  magenta
             magenta:
-            #( veryLight lightened 100 87 67 50 33)
+            #( veryLight lightened 100 87 67 50 33 25)
         )
         #(  yellow
             yellow:
-            #( veryLight lightened 100 87 67 50 33)
+            #( veryLight lightened 100 87 67 50 33 25)
         )
 
     )
@@ -256,7 +256,9 @@
 colorMenu
     |menu menuItem subItem baseColor color label getColSel submenu colorId|
 
-    "ColorMenuSpec := nil"
+    "
+     ColorMenuSpec := nil
+    "
 
     ColorMenuSpec notNil ifTrue:[ ^ ColorMenuSpec ].
 
@@ -568,7 +570,7 @@
 !
 
 setupMenu
-    |menu item toggleItem|
+    |menu toggleItem|
 
     menu := self class colorMenu:labelsAreColored value:nil.
 
@@ -595,7 +597,7 @@
     menu 
         addItem:(
             (MenuItem labeled:nil)
-                labelImage:(ToolbarIconLibrary history16x16Icon);
+                labelImage:(ToolbarIconLibrary colorHistory16x16Icon);
                 submenuChannel:[ self colorHistorySubmenu ]; 
                 nameKey:#pseudoHistory;
                 activeHelpKey:#recentlyUsedColors;
@@ -650,5 +652,5 @@
 !ColorMenu class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/ColorMenu.st,v 1.58 2009-05-19 16:22:00 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/ColorMenu.st,v 1.59 2009-05-28 06:37:26 cg Exp $'
 ! !