--- a/MemoryUsageView.st Tue Apr 11 12:20:31 2000 +0200
+++ b/MemoryUsageView.st Wed Apr 12 23:35:32 2000 +0200
@@ -116,7 +116,7 @@
special kludge
"
class isSymbol ifTrue:[
- class == #Namespace ifFalse:[
+ class == #NameSpace ifFalse:[
self information:'classes are directly refered to by Smalltalk'.
^ self.
].
@@ -151,7 +151,7 @@
special kludge
"
class isSymbol ifTrue:[
- class == #Namespace ifFalse:[
+ class == #NameSpace ifFalse:[
^ SystemBrowser open
].
class := (Smalltalk at:class) class.
@@ -195,7 +195,7 @@
special kludge
"
class isSymbol ifTrue:[
- class == #Namespace ifFalse:[
+ class == #NameSpace ifFalse:[
^ SystemBrowser open
].
class := (Smalltalk at:class) class.
@@ -427,7 +427,7 @@
cls == #ObsoleteClass ifTrue:[
'<all obsolete classes>'
] ifFalse:[
- cls == #Namespace ifTrue:[
+ cls == #NameSpace ifTrue:[
'<all namespaces>'
] ifFalse:[
cls isJavaClass ifTrue:[
@@ -540,7 +540,7 @@
and:[o ~~ NameSpace
and:[o ~~ Smalltalk]])
ifTrue:[
- class := #Namespace
+ class := #NameSpace
] ifFalse:[
class := #Class
]
@@ -587,5 +587,5 @@
!MemoryUsageView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/MemoryUsageView.st,v 1.37 2000-04-07 08:06:57 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/MemoryUsageView.st,v 1.38 2000-04-12 21:35:32 cg Exp $'
! !