Metaclass.st
branchjv
changeset 18011 deb0c3355881
parent 17880 360b58c69299
parent 14647 55ae1eae669b
child 18120 e3a375d5f6a8
--- a/Metaclass.st	Thu Dec 20 11:48:59 2012 +0000
+++ b/Metaclass.st	Sat Jan 19 01:30:00 2013 +0000
@@ -127,14 +127,13 @@
     "Created: / 1.11.1997 / 13:16:45 / cg"
 ! !
 
-
 !Metaclass methodsFor:'autoload check'!
 
 isLoaded
     "return true, if the class has been loaded;
      redefined in Autoload; see comment there"
 
-    ^ myClass isLoaded
+    ^ myClass isNil or:[ myClass isLoaded ]
 
 
 ! !
@@ -911,11 +910,7 @@
 !Metaclass class methodsFor:'documentation'!
 
 version_CVS
-    ^ '§Header: /cvs/stx/stx/libbasic/Metaclass.st,v 1.210 2011/07/01 11:44:26 cg Exp §'
-!
-
-version_SVN
-    ^ '$Id: Metaclass.st 10713 2011-10-06 09:18:54Z vranyj1 $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Metaclass.st,v 1.211 2013-01-11 11:45:37 cg Exp $'
 ! !
 
 Metaclass initialize!