--- 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 $'
! !