The Trunk: Kernel-ul.940.mcz

Previous Topic Next Topic
 
classic Classic list List threaded Threaded
2 messages Options
Reply | Threaded
Open this post in threaded view
|

The Trunk: Kernel-ul.940.mcz

commits-2
Levente Uzonyi uploaded a new version of Kernel to project The Trunk:
http://source.squeak.org/trunk/Kernel-ul.940.mcz

==================== Summary ====================

Name: Kernel-ul.940
Author: ul
Time: 14 August 2015, 7:01:14.824 pm
UUID: 45cb01b1-52ab-40ff-ac9d-7b3334915356
Ancestors: Kernel-ul.939

#allCharacters -> #allByteCharacters

=============== Diff against Kernel-ul.939 ===============

Item was changed:
  ----- Method: InputSensor class>>installKeyDecodeTable (in category 'class initialization') -----
  installKeyDecodeTable
  "Create a decode table that swaps some keys if
  Preferences swapControlAndAltKeys is set"
  KeyDecodeTable := Dictionary new.
  Preferences duplicateControlAndAltKeys
  ifTrue: [ self defaultCrossPlatformKeys do:
  [ :c | self installDuplicateKeyEntryFor: c ] ].
  Preferences swapControlAndAltKeys
  ifTrue: [ self defaultCrossPlatformKeys do:
  [ :c | self installSwappedKeyEntryFor: c ] ].
  Preferences duplicateAllControlAndAltKeys
+ ifTrue: [ (Character allByteCharacters select: [:ea | ea isAlphaNumeric]) do:
- ifTrue: [ (Character allCharacters select: [:ea | ea isAlphaNumeric]) do:
  [ :c | self installDuplicateKeyEntryFor: c ] ].
  !


Reply | Threaded
Open this post in threaded view
|

Re: The Trunk: Kernel-ul.940.mcz

Nicolas Cellier
+1, I had the same change rotting for months in an image...

2015-08-14 22:29 GMT+02:00 <[hidden email]>:
Levente Uzonyi uploaded a new version of Kernel to project The Trunk:
http://source.squeak.org/trunk/Kernel-ul.940.mcz

==================== Summary ====================

Name: Kernel-ul.940
Author: ul
Time: 14 August 2015, 7:01:14.824 pm
UUID: 45cb01b1-52ab-40ff-ac9d-7b3334915356
Ancestors: Kernel-ul.939

#allCharacters -> #allByteCharacters

=============== Diff against Kernel-ul.939 ===============

Item was changed:
  ----- Method: InputSensor class>>installKeyDecodeTable (in category 'class initialization') -----
  installKeyDecodeTable
        "Create a decode table that swaps some keys if
        Preferences swapControlAndAltKeys is set"
        KeyDecodeTable := Dictionary new.
        Preferences duplicateControlAndAltKeys
                ifTrue: [ self defaultCrossPlatformKeys do:
                                [ :c | self installDuplicateKeyEntryFor: c ] ].
        Preferences swapControlAndAltKeys
                ifTrue: [ self defaultCrossPlatformKeys do:
                                [ :c | self installSwappedKeyEntryFor: c ] ].
        Preferences duplicateAllControlAndAltKeys
+               ifTrue: [ (Character allByteCharacters select: [:ea | ea isAlphaNumeric]) do:
-               ifTrue: [ (Character allCharacters select: [:ea | ea isAlphaNumeric]) do:
                                [ :c | self installDuplicateKeyEntryFor: c ] ].
  !