# HG changeset patch
# User mawalch
# Date 1455128109 -3600
# Node ID 22f1ee605c160f082fecf884a7ba5a9a2aec774f
# Parent  87e7d17b96e15bda82b32e4e4350b64161b45d87
#BUGFIX
class: Class
changed: #containingNameSpace
care for non-symbol class name

diff -r 87e7d17b96e1 -r 22f1ee605c16 Class.st
--- 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