--- 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 $'
+! !
+