use collect:as:
authorClaus Gittinger <cg@exept.de>
Sun, 23 Aug 2009 11:25:42 +0200
changeset 5331 b82f0ada86b3
parent 5330 eb0bfc409b60
child 5332 064c01f1b4c9
use collect:as:
Depth8Image.st
--- a/Depth8Image.st	Mon Aug 17 19:46:10 2009 +0200
+++ b/Depth8Image.st	Sun Aug 23 11:25:42 2009 +0200
@@ -289,7 +289,7 @@
 
     "sort by usage"
     usageCounts := bytes usageCounts.
-    usageCounts := usedColors asArray collect:[:clr | usageCounts at:(clr + 1)].
+    usageCounts := usedColors collect:[:clr | usageCounts at:(clr + 1)] as:Array.
     usageCounts sort:[:a :b | a > b] with:usedColors.
 
     "allocate the colors (in order of usage count)"
@@ -2447,5 +2447,5 @@
 !Depth8Image class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/Depth8Image.st,v 1.112 2008-01-27 16:23:39 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/Depth8Image.st,v 1.113 2009-08-23 09:25:42 cg Exp $'
 ! !