Mercurial Mercurial > hg > stx-libtool / 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.
use collect:as:
authorClaus Gittinger <cg@exept.de>
Sun, 23 Aug 2009 11:30:45 +0200
changeset 8680 67c4eaab32cf
parent 8679 d5bf7fa670c5
child 8681 5df7adbc838e
use collect:as:
AbstractLauncherApplication.st file | annotate | diff | comparison | revisions 
--- a/AbstractLauncherApplication.st	Sun Aug 23 11:29:09 2009 +0200
+++ b/AbstractLauncherApplication.st	Sun Aug 23 11:30:45 2009 +0200
@@ -3423,8 +3423,8 @@
 
     mappings := Screen current keyboardMap.
 
-    listOfRawKeys := (mappings keys asArray collect:[:key | key asString]) sort.
-    listOfFunctions := (mappings values asSet asArray collect:[:key | key asString]) sort.
+    listOfRawKeys := (mappings keys collect:[:key | key asString] as:Array) sort.
+    listOfFunctions := (mappings values asSet collect:[:key | key asString] as:Array) sort.
 
     selectionForwarder := Plug new.
     selectionForwarder respondTo:#showFunction
@@ -6688,5 +6688,5 @@
 !AbstractLauncherApplication class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractLauncherApplication.st,v 1.376 2009-06-07 10:17:23 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractLauncherApplication.st,v 1.377 2009-08-23 09:30:45 cg Exp $'
 ! !
hg/stx-libtool