#REFACTORING by cg draft
authorClaus Gittinger <cg@exept.de>
Fri, 01 Mar 2019 16:01:08 +0100
changeset 3645 d63702a90407
parent 3644 61d49e748c1f
child 3646 41efae926aa9
#REFACTORING by cg class: MethodFinderWindow changed: #updateImplementorsOf: (send #~~ instead of #>)
MethodFinderWindow.st
--- a/MethodFinderWindow.st	Thu Feb 28 11:58:13 2019 +0100
+++ b/MethodFinderWindow.st	Fri Mar 01 16:01:08 2019 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  Copyright (C) Original Authors (Kaehler, Scott Wallace and Dan Ingalls)
  Copyright (C) 2001 eXept Software AG
@@ -1219,7 +1221,7 @@
     classList := (self markMatchingClasses:(resultSelectors at:aNumber)
             classesWithSelector:classList).
     self classOfResultHolder value:classList.
-    classList size > 0 ifTrue:[
+    classList size ~~ 0 ifTrue:[
         self selectedClassOfResultHolder value:(classList first).
         self selectedClassOfResultHolderChanged.
     ] ifFalse:[
@@ -1227,6 +1229,7 @@
     ].
 
     "Modified (comment): / 24-06-2012 / 18:41:45 / cg"
+    "Modified: / 01-03-2019 / 16:00:38 / Claus Gittinger"
 !
 
 updateListAfterPatternSearch:resultList