--- a/UIPainter.st Sat Dec 21 14:11:41 2002 +0100
+++ b/UIPainter.st Wed Jan 08 13:16:05 2003 +0100
@@ -2186,7 +2186,6 @@
layoutTool modifiedHolder:modifiedChannel.
helpTool := UIHelpTool new.
- helpTool createBuilder.
applBuilder := helpTool builder.
applWindow := ApplicationSubView origin:0.0@0.0 corner:1.0@1.0 in:noteBook.
applWindow level:0.
@@ -2363,19 +2362,17 @@
editor := MenuEditor new.
editor masterApplication:self.
editor specClass: cls.
- editor useHelpTool: self helpTool.
+ editor useHelpTool:(self helpTool).
selectorOrMenu class ~~ Menu
ifTrue: [editor openModalOnClass:cls andSelector:selectorOrMenu]
ifFalse: [editor openModalOnMenu:selectorOrMenu].
- self helpTool updateList.
-
editor hasSaved ifTrue:[
holder := self specTool aspectFor:#menuSelector.
holder value:(editor specSelector).
self accept.
- ^ self
+ ^ self
].
!
@@ -2874,9 +2871,7 @@
ifFalse:[aClass].
self helpTool buildFromClass:specClass.
- self helpTool updateList.
self clearModifiedFlag.
-
! !
!UIPainter methodsFor:'private tools'!
@@ -3840,10 +3835,9 @@
(ReadStream on:code) fileIn.
self doGenerateAspectSelectorsMethod.
-
- self helpTool installHelpSpecsOnClass:specClass.
-
+ self helpTool doSave.
self updateInfoLabel.
+
modified := false.
painter resetModification.
(cls class includesSelector: specSelector) ifTrue:[