--- a/DoWhatIMeanSupport.st	Sat Oct 04 12:28:34 2008 +0200
+++ b/DoWhatIMeanSupport.st	Sat Oct 04 13:30:08 2008 +0200
@@ -448,7 +448,7 @@
     crsrPos := codeView characterPositionOfCursor.
     char := codeView characterAtCharacterPosition:crsrPos-1.
     char isSeparator ifTrue:[
-        nodeVal := cls nameSpace at:nm asSymbol ifAbsent:[Smalltalk at:nm asSymbol].
+        nodeVal := cls topNameSpace at:nm asSymbol ifAbsent:[Smalltalk at:nm asSymbol].
         nodeVal isBehavior ifTrue:[
             |methods menu exitKey idx|
 
@@ -1635,5 +1635,5 @@
 !DoWhatIMeanSupport class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/DoWhatIMeanSupport.st,v 1.36 2008-08-20 20:38:47 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/DoWhatIMeanSupport.st,v 1.37 2008-10-04 11:30:08 cg Exp $'
 ! !