--- a/UIPainter.st Wed Jun 22 14:29:39 2011 +0200
+++ b/UIPainter.st Fri Jun 24 10:46:37 2011 +0200
@@ -5366,11 +5366,13 @@
doGenerateAspectSelectorsMethod
"generates aspectSelectors method for the exported aspects"
+ |aspectSelectorsAsString|
self askForSectionModification.
-
- (ReadStream on:self painter generateAspectSelectorsMethod) fileIn.
-
+ aspectSelectorsAsString := self painter generateAspectSelectorsMethod.
+ aspectSelectorsAsString notEmptyOrNil ifTrue:[
+ (ReadStream on:aspectSelectorsAsString) fileIn.
+ ].
!
doGenerateHookMethods