--- a/ColorMenu.st	Wed Jul 24 22:14:58 2013 +0200
+++ b/ColorMenu.st	Fri Jul 26 20:46:36 2013 +0200
@@ -374,8 +374,15 @@
 
 !ColorMenu methodsFor:'accepting'!
 
+accept
+    "must be ignored, as sent by dialogBox's doAccept
+     and is defined in superclass to call accept: with nil argument"
+
+    "Created: / 26-07-2013 / 20:43:26 / cg"
+!
+
 accept:anItem
-    "accept the current selected item"
+    "accept the current selected item (called from my pulldown menus)"
 
     |holder colorAccepted|
 
@@ -408,6 +415,7 @@
     ]
 
     "Modified: / 17-08-2011 / 08:57:12 / cg"
+    "Modified (comment): / 26-07-2013 / 20:43:19 / cg"
 !
 
 chooseColor:aColor
@@ -813,5 +821,6 @@
 !ColorMenu class methodsFor:'documentation'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg2/ColorMenu.st,v 1.76 2012-12-11 15:44:11 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/ColorMenu.st,v 1.77 2013-07-26 18:46:36 cg Exp $'
 ! !
+