changed: #getClassesAndMethodsFor:
authoraz
Wed, 05 Oct 2011 16:14:01 +0200
changeset 10751 d36281245163
parent 10750 4f0913593334
child 10752 77650773a9ea
changed: #getClassesAndMethodsFor:
Tools_SearchDialog.st
--- a/Tools_SearchDialog.st	Wed Oct 05 13:50:19 2011 +0200
+++ b/Tools_SearchDialog.st	Wed Oct 05 16:14:01 2011 +0200
@@ -1122,11 +1122,11 @@
     ].
     (where == #listOfSelectedMethods) ifTrue:[ 
         classes := nil.
-        methods := browser selectedMethods value.
+        methods := browser selectedMethods value ? #().
         ^ self.
     ].
     (where == #listOfSelectedMethodClasses) ifTrue:[ 
-        classes := (browser selectedMethods value collect:[:m | m mclass theNonMetaclass]) asSet asOrderedCollection.
+        classes := ((browser selectedMethods value ? #()) collect:[:m | m mclass theNonMetaclass]) asSet asOrderedCollection.
         methods := nil.
         ^ self.
     ].
@@ -1157,6 +1157,7 @@
     self halt:'inumplemented search'.
 
     "Modified: / 19-11-2010 / 12:01:15 / cg"
+    "Modified: / 05-10-2011 / 15:48:20 / az"
 !
 
 helpTextForMetaPatterns
@@ -1264,7 +1265,7 @@
 !SearchDialog class methodsFor:'documentation'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools_SearchDialog.st,v 1.65 2011-08-08 18:47:27 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools_SearchDialog.st,v 1.66 2011-10-05 14:14:01 az Exp $'
 ! !
 
 SearchDialog initialize!