--- a/DebugView.st	Mon Jan 17 20:41:04 2011 +0100
+++ b/DebugView.st	Tue Jan 18 18:07:34 2011 +0100
@@ -5157,7 +5157,7 @@
             aBlock value:((currentMethod mclass ? receiversNonMetaClass) theNonMetaclass classVarAt:nm) value:'classVar ',nmBold.
             ^ self 
         ].
-        receiversNonMetaClass sharedPools do:[:eachPoolName |
+        receiversNonMetaClass sharedPoolNames do:[:eachPoolName |
             |pool|
 
             pool := Smalltalk at:eachPoolName.
@@ -5273,7 +5273,7 @@
     ].
     aBlock value:nmBold , ' is not in scope of selected context' value:nil.
 
-    "Modified: / 27-04-2010 / 17:49:51 / cg"
+    "Modified: / 18-01-2011 / 17:57:34 / cg"
 ! !
 
 !DebugView methodsFor:'private queries'!
@@ -7085,11 +7085,11 @@
 !DebugView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.514 2010-12-08 17:25:25 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.515 2011-01-18 17:07:34 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.514 2010-12-08 17:25:25 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.515 2011-01-18 17:07:34 cg Exp $'
 ! !
 
 DebugView initialize!