--- a/AbstractLauncherApplication.st	Tue Apr 02 11:34:13 2013 +0200
+++ b/AbstractLauncherApplication.st	Tue Apr 02 14:03:37 2013 +0200
@@ -3765,8 +3765,8 @@
 
     mappings := Screen current keyboardMap.
 
-    listOfRawKeys := (mappings keys collect:[:key | key asString] as:Array) sort.
-    listOfFunctions := (mappings values asSet collect:[:key | key asString] as:Array) sort.
+    listOfRawKeys := (mappings keys collect:[:key | key asString]) asArray sort.
+    listOfFunctions := (mappings values asSet collect:[:key | key asString]) asArray sort.
 
     selectionForwarder := Plug new.
     selectionForwarder respondTo:#showFunction
@@ -7022,11 +7022,11 @@
 !AbstractLauncherApplication class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractLauncherApplication.st,v 1.427 2013-04-02 09:33:27 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractLauncherApplication.st,v 1.428 2013-04-02 12:03:37 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractLauncherApplication.st,v 1.427 2013-04-02 09:33:27 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractLauncherApplication.st,v 1.428 2013-04-02 12:03:37 stefan Exp $'
 !
 
 version_SVN