Don't do collect:[] as:Array and select:[] as:Array
authorStefan Vogel <sv@exept.de>
Tue, 02 Apr 2013 14:03:40 +0200
changeset 12618 6826e388836e
parent 12617 68fecd087547
child 12619 f167e0e38069
Don't do collect:[] as:Array and select:[] as:Array
AbstractSettingsApplication.st
--- a/AbstractSettingsApplication.st	Tue Apr 02 14:03:37 2013 +0200
+++ b/AbstractSettingsApplication.st	Tue Apr 02 14:03:40 2013 +0200
@@ -6028,8 +6028,8 @@
     
     mappings := Screen current keyboardMap.
 
-    rawKeyList := (mappings keys collect:[:key | key asString] as:Array) sort.
-    functionKeyList := (mappings values asSet collect:[:key | key asString] as:Array) sort.
+    rawKeyList := (mappings keys collect:[:key | key asString]) asArray sort.
+    functionKeyList := (mappings values asSet collect:[:key | key asString]) asArray sort.
 
     self labelTextHolder value:(resources at:'KEY_MSG2' default:'keyboard mapping:') withCRs.
 ! !
@@ -17563,10 +17563,10 @@
 !AbstractSettingsApplication class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractSettingsApplication.st,v 1.462 2013-03-28 23:29:00 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractSettingsApplication.st,v 1.463 2013-04-02 12:03:40 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractSettingsApplication.st,v 1.462 2013-03-28 23:29:00 stefan Exp $'
-! !
-
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractSettingsApplication.st,v 1.463 2013-04-02 12:03:40 stefan Exp $'
+! !
+