--- a/Label.st Fri Aug 23 20:38:40 2013 +0200
+++ b/Label.st Sat Aug 24 08:29:14 2013 +0200
@@ -1460,9 +1460,12 @@
m := super middleButtonMenu.
m isNil ifTrue:[
- "/ not a customized menu
- self class == Label ifTrue:[
- m := self class middleButtonMenu
+ m := self yellowButtonMenu.
+ m isNil ifTrue:[
+ "/ not a customized menu
+ self class == Label ifTrue:[
+ m := self class middleButtonMenu
+ ]
].
].
^ m
@@ -1953,10 +1956,10 @@
!Label class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/Label.st,v 1.149 2013-08-22 17:23:14 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/Label.st,v 1.150 2013-08-24 06:29:14 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libwidg/Label.st,v 1.149 2013-08-22 17:23:14 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/Label.st,v 1.150 2013-08-24 06:29:14 cg Exp $'
! !