MCClassDefinition.st
changeset 934 6a56a913c6b0
parent 897 76481ea7aaba
child 968 70b2a6241dd2
--- a/MCClassDefinition.st	Tue Oct 07 00:57:57 2014 +0200
+++ b/MCClassDefinition.st	Tue Oct 07 01:21:51 2014 +0200
@@ -378,6 +378,7 @@
                                             ifFalse:[ env name ,'::',superclassName].
             superClass := Class undeclared: installedSuperclassName
         ].
+        superClass isLoaded ifFalse:[ superClass autoload ].
 
         "/ env := superClass environment. 
 
@@ -401,8 +402,8 @@
                         evaluate: self classTraitComposition) asTraitComposition ].
         ^class.
 
-    "Modified: / 09-11-2010 / 08:30:38 / Jan Vrany <jan.vrany@fit.cvut.cz>"
     "Modified (comment): / 07-09-2011 / 13:32:38 / cg"
+    "Modified: / 07-10-2014 / 00:20:43 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 load
@@ -639,14 +640,14 @@
 !MCClassDefinition class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/goodies/monticello/MCClassDefinition.st,v 1.15 2013-09-19 23:15:20 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/goodies/monticello/MCClassDefinition.st,v 1.16 2014-10-06 23:21:51 vrany Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/goodies/monticello/MCClassDefinition.st,v 1.15 2013-09-19 23:15:20 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/goodies/monticello/MCClassDefinition.st,v 1.16 2014-10-06 23:21:51 vrany Exp $'
 !
 
 version_SVN
-    ^ '$Id: MCClassDefinition.st,v 1.15 2013-09-19 23:15:20 vrany Exp $'
+    ^ '$Id: MCClassDefinition.st,v 1.16 2014-10-06 23:21:51 vrany Exp $'
 ! !