--- a/UIPainterView.st Thu Nov 05 20:28:01 2009 +0100
+++ b/UIPainterView.st Thu Nov 05 20:32:12 2009 +0100
@@ -100,9 +100,14 @@
generateCommentedCode:aBoolean
"comments in generated aspect methods; yes or no."
+ UserPreferences current generateComments ifFalse:[
+ aBoolean ifTrue:[
+ UserPreferences current generateComments:true
+ ].
+ ].
+
UserPreferences current
- generateComments:true;
- generateCommentsForAspectMethods:true.
+ generateCommentsForAspectMethods:aBoolean.
!
redefineAspectMethods