--- a/UIPainterView.st Fri Feb 25 18:53:42 2000 +0100
+++ b/UIPainterView.st Mon Feb 28 15:10:45 2000 +0100
@@ -955,26 +955,26 @@
AspectsAsInstances ifTrue:[
code := (code , '\' ,
- ' "/ ' , aspect , ' notNil ifTrue:[\' ,
- ' "/ ' , aspect , ' removeDependent:self.\' ,
- ' "/ ].\' ,
+ '"/ ' , aspect , ' notNil ifTrue:[\' ,
+ '"/ ' , aspect , ' removeDependent:self.\' ,
+ '"/ ].\' ,
' ' , aspect ,' := something.\' ,
- ' "/ ' , aspect ,' notNil ifTrue:[\' ,
- ' "/ ' , aspect , ' addDependent:self.\' ,
- ' "/ ].\' ,
+ '"/ ' , aspect ,' notNil ifTrue:[\' ,
+ '"/ ' , aspect , ' addDependent:self.\' ,
+ '"/ ].\' ,
' ^ self.\' ,
'!! !!\\')
] ifFalse:[
code := (code , '\' ,
- ' "/ |holder|\' ,
+ '"/ |holder|\' ,
'\' ,
- ' "/ (holder := builder bindingAt:#' , aspect , ') notNil ifTrue:[\' ,
- ' "/ holder removeDependent:self.\' ,
- ' "/ ].\' ,
+ '"/ (holder := builder bindingAt:#' , aspect , ') notNil ifTrue:[\' ,
+ '"/ holder removeDependent:self.\' ,
+ '"/ ].\' ,
' builder aspectAt:#' , aspect , ' put:something.\',
- ' "/ something notNil ifTrue:[\' ,
- ' "/ something addDependent:self.\' ,
- ' "/ ].\' ,
+ '"/ something notNil ifTrue:[\' ,
+ '"/ something addDependent:self.\' ,
+ '"/ ].\' ,
' ^ self.\' ,
'!! !!\\')
].