changeset 3076 | b574eb0ba087 |
parent 3048 | 9d9ab34773a6 |
child 3096 | e3de9d8ad4ec |
--- a/DataSetBuilder.st Tue Jan 28 21:59:08 2014 +0100 +++ b/DataSetBuilder.st Tue Jan 28 21:59:18 2014 +0100 @@ -3945,7 +3945,9 @@ , '\\'. code := code withCRs. - (ReadStream on:code) fileIn. + Class packageQuerySignal answer:cls package do:[ + (ReadStream on:code) fileIn. + ]. "/ self isStandAlone ifTrue: [self helpTool installHelpSpecsOnClass:self specClass]. @@ -3954,6 +3956,8 @@ hasSaved := true. self clearModified. + + "Modified: / 28-01-2014 / 21:57:35 / cg" ! openDocumentation