--- a/Tools_SearchDialog.st	Fri Oct 06 18:50:16 2006 +0200
+++ b/Tools_SearchDialog.st	Mon Oct 09 11:11:05 2006 +0200
@@ -9,7 +9,6 @@
  other person.  No title to or ownership of the software is
  hereby transferred.
 "
-
 "{ Package: 'stx:libtool' }"
 
 "{ NameSpace: Tools }"
@@ -296,9 +295,11 @@
         "/            self makeTabable:b.
         "/        ].
         browser isMethodListBrowser ifTrue:[
-            methodNameSpaces := (browser selectedMethods value ? #()) 
-                        collect:[:eachMethod | eachMethod mclass topNameSpace ].
-            methodPackages := (browser selectedMethods value ? #()) 
+            methods := browser selectedMethods value ? #().
+            methodNameSpaces := methods
+                        select:[:eachMethod | eachMethod mclass notNil]
+                        thenCollect:[:eachMethod | eachMethod mclass topNameSpace ].
+            methodPackages := methods 
                         collect:[:eachMethod | eachMethod package ].
         ].
         methodNameSpaces size == 1 ifTrue:[
@@ -426,6 +427,8 @@
     self addButtons.
 
     self label:(resources string:'Search').
+
+    "Modified: / 08-10-2006 / 16:26:00 / cg"
 ! !
 
 !SearchDialog methodsFor:'setup'!
@@ -1004,5 +1007,5 @@
 !SearchDialog class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools_SearchDialog.st,v 1.18 2006-09-21 15:39:10 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools_SearchDialog.st,v 1.19 2006-10-09 09:11:05 cg Exp $'
 ! !