--- a/Explainer.st Fri Dec 20 01:16:34 1996 +0100
+++ b/Explainer.st Mon Dec 23 12:18:08 1996 +0100
@@ -176,10 +176,10 @@
].
].
- (spc := aClass namespace) notNil ifTrue:[
+ (spc := aClass nameSpace) notNil ifTrue:[
(Smalltalk at:(spc name , '::' , string) asSymbol) isBehavior ifTrue:[
- ^ (string , ' is a class in the ''' , spc name , ''' namespace.'
- , '\\It is only visible within this namespace.'
+ ^ (string , ' is a class in the ''' , spc name , ''' nameSpace.'
+ , '\\It is only visible within this nameSpace.'
, '\Access from the outside is possible'
, '\by the special name ''' , spc name , '::' , string , '''.') withCRs
].
@@ -207,7 +207,7 @@
^ 'cannot explain this - select individual tokens for an explanation.'
"Created: 3.12.1995 / 12:47:37 / cg"
- "Modified: 14.11.1996 / 14:47:32 / cg"
+ "Modified: 21.12.1996 / 20:52:54 / cg"
!
explainHereIn:aClass
@@ -520,5 +520,5 @@
!Explainer class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libcomp/Explainer.st,v 1.22 1996-11-14 13:48:14 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libcomp/Explainer.st,v 1.23 1996-12-23 11:18:08 cg Exp $'
! !