--- 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.\' ,
           '!! !!\\') 
     ].