--- a/Explainer.st	Wed Nov 06 11:58:13 2002 +0100
+++ b/Explainer.st	Thu Nov 07 14:43:42 2002 +0100
@@ -301,7 +301,7 @@
     val := Smalltalk at:sym.
     val isBehavior ifTrue:[
         "/ a class
-        val isNamespace ifTrue:[
+        val isNameSpace ifTrue:[
             ^ stringText , ' is a namespace.'
         ].
 
@@ -864,5 +864,5 @@
 !Explainer class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/Explainer.st,v 1.56 2002-11-06 10:58:13 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/Explainer.st,v 1.57 2002-11-07 13:43:42 stefan Exp $'
 ! !