diff -r f0c1c7b621eb -r de5377ba14e4 MenuPanel.st --- a/MenuPanel.st Sat Jun 28 10:49:26 2014 +0200 +++ b/MenuPanel.st Sat Jun 28 11:00:58 2014 +0200 @@ -7435,8 +7435,7 @@ drawObject := displayLabel. isEnabled := self enabled. isSelected := self isSelected. -Transcript show:'draw '. -Transcript showCR:isSelected. + isSelected ifFalse:[ "/ test whether button has pressed toggle behaviour showSelected := (self isToggle and:[self indicationValue]). @@ -8825,11 +8824,11 @@ !MenuPanel class methodsFor:'documentation'! version - ^ '$Header: /cvs/stx/stx/libwidg2/MenuPanel.st,v 1.596 2014-06-28 08:49:26 cg Exp $' + ^ '$Header: /cvs/stx/stx/libwidg2/MenuPanel.st,v 1.597 2014-06-28 09:00:58 cg Exp $' ! version_CVS - ^ '$Header: /cvs/stx/stx/libwidg2/MenuPanel.st,v 1.596 2014-06-28 08:49:26 cg Exp $' + ^ '$Header: /cvs/stx/stx/libwidg2/MenuPanel.st,v 1.597 2014-06-28 09:00:58 cg Exp $' ! !