Mercurial Mercurial > hg > stx-libwidg2 / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Refactoring:
authorStefan Vogel <sv@exept.de>
Tue, 02 Apr 2013 11:32:15 +0200
changeset 4194 e677aae984be
parent 4193 b9bd0aa9631a
child 4195 f154f90d39a6
Refactoring: replace asSet copy by asNewSet (same for IdentitySet) replace (xxx collect:[]) asSet by (xxx collect:[] as:Set) replace (xxx select:[]) asSet by (xxx select:[] as:Set)
DoWhatIMeanSupport.st file | annotate | diff | comparison | revisions 
--- a/DoWhatIMeanSupport.st	Wed Mar 27 16:54:20 2013 +0100
+++ b/DoWhatIMeanSupport.st	Tue Apr 02 11:32:15 2013 +0200
@@ -755,14 +755,14 @@
         implementors size > 50 ifTrue:[
             implementors := implementors asOrderedCollection copyTo:50.
         ].
-        namesUsed := (implementors 
+        namesUsed := implementors 
                         collect:[:eachImplementor |
                             |parseTree|
                             parseTree := eachImplementor parseTree.
                             (parseTree notNil and:[parseTree arguments size > 0]) 
                                 ifFalse:nil
                                 ifTrue:[ (parseTree arguments at:argIdx) name] ]
-                        thenSelect:[:a | a notNil]) asSet.  
+                        thenSelect:[:a | a notNil] as:Set.  
 
         addWithFactorBlock value:namesUsed value:(2 * localFactor).
 
@@ -2291,5 +2291,6 @@
 !DoWhatIMeanSupport class methodsFor:'documentation'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg2/DoWhatIMeanSupport.st,v 1.96 2012-10-24 17:24:07 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/DoWhatIMeanSupport.st,v 1.97 2013-04-02 09:32:15 stefan Exp $'
 ! !
+
hg/stx-libwidg2