--- a/UIPainter.st Wed Nov 07 10:20:09 2001 +0100
+++ b/UIPainter.st Wed Nov 07 11:12:27 2001 +0100
@@ -2359,19 +2359,19 @@
!UIPainter methodsFor:'menus - dynamic'!
menuEdit
- |m i|
-
- m := self class menuEdit.
- m := m decodeAsLiteralArray.
- i := m detectItem:[:item | item nameKey == #undo] ifNone:nil.
- i notNil ifTrue:[
- i label:(i label , ' (' , self painter undoHistory labelOfLastUndo , ')')
- ].
- m findGuiResourcesIn:self.
- ^ m
-
- "Created: / 30.10.2001 / 13:29:04 / cg"
- "Modified: / 30.10.2001 / 13:47:19 / cg"
+ ^ [
+ |m i|
+
+ m := self class menuEdit.
+ m := m decodeAsLiteralArray.
+ i := m detectItem:[:item | item nameKey == #undo] ifNone:nil.
+ i notNil ifTrue:[
+ i label:(i label , ' (' , self painter undoHistory labelOfLastUndo , ')')
+ ].
+ m receiver:self.
+ m findGuiResourcesIn:self.
+ m
+ ].
! !
!UIPainter methodsFor:'private'!