--- a/NameSpace.st	Wed Aug 04 09:58:10 1999 +0200
+++ b/NameSpace.st	Wed Aug 04 16:10:22 1999 +0200
@@ -103,7 +103,7 @@
                 thisNamespace := Smalltalk at:key.
                 (thisNamespace notNil
                 and:[thisNamespace isBehavior not]) ifTrue:[
-                    ^ self error:'name conflict: namespace ' , aName , ' vs. global'.
+                    self error:'name conflict: namespace ' , aName , ' vs. global'.
                 ]
             ].
             thisNamespace isNil ifTrue:[
@@ -158,7 +158,6 @@
     ].
     ok ifFalse:[
         self error:'invalid namespace name:''' , aStringOrSymbol printString , ''' (must be a valid identifier)'.
-        ^ nil.
     ].
 
     currentNameSpace := Class nameSpaceQuerySignal query.
@@ -401,5 +400,5 @@
 !Namespace class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/NameSpace.st,v 1.31 1999-07-26 14:01:44 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/NameSpace.st,v 1.32 1999-08-04 14:08:36 cg Exp $'
 ! !