--- a/ClassChange.st	Mon Aug 07 15:48:09 2006 +0200
+++ b/ClassChange.st	Mon Aug 07 16:05:44 2006 +0200
@@ -213,6 +213,8 @@
 nameSpaceName
     |ns cnm idx|
 
+    className isNil ifTrue:[^ nil].
+
     (className includes:$:) ifTrue:[
         "/ in a namespace
         ^ className upTo:$:.
@@ -225,6 +227,8 @@
         ^ self nameSpaceForVWNamespace:ns class:cnm ifAbsent:ns
     ].
     ^ nil
+
+    "Modified: / 03-08-2006 / 02:04:03 / cg"
 ! !
 
 !ClassChange methodsFor:'printing & storing'!
@@ -277,5 +281,5 @@
 !ClassChange class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/ClassChange.st,v 1.41 2006-06-15 09:52:37 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/ClassChange.st,v 1.42 2006-08-07 14:05:44 cg Exp $'
 ! !