--- a/Class.st	Wed Feb 10 12:27:13 2016 +0100
+++ b/Class.st	Wed Feb 10 19:15:09 2016 +0100
@@ -1022,7 +1022,7 @@
 
     "/ (self nameSpace at:self nameWithoutNamespacePrefix ifAbsent:nil)
     "/ or
-    (Smalltalk at:name) ~~ self ifTrue:[
+    (name isSymbol and:[(Smalltalk at:name) == self]) ifFalse:[
         ^ nil
     ].
     ^ self nameSpace
@@ -1979,6 +1979,7 @@
     "Created: / 18-07-2011 / 09:14:38 / cg"
 ! !
 
+
 !Class methodsFor:'adding & removing'!
 
 removeFromSystem