Bert Freudenberg uploaded a new version of Multilingual to project The Trunk:
http://source.squeak.org/trunk/Multilingual-bf.136.mcz

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

Name: Multilingual-bf.136
Author: bf
Time: 31 January 2011, 5:03:34.511 pm
UUID: c2e685e7-a73c-44b6-93b8-1bf6319972eb
Ancestors: Multilingual-ul.135

- make MacUnicodeInputInterpreter use utf32 keycode unconditionally, since VMs older than 4.x are not supported anymore anyway.

=============== Diff against Multilingual-ul.135 ===============

Item was removed:
- ----- Method: MacUnicodeInputInterpreter>>initialize (in category 'initialization') -----
- initialize
- 	| satisfiesVersion |
- 	satisfiesVersion := self
- 				majorMinorBuildFrom: SmalltalkImage current vmVersion
- 				satisfies: [:major :minor :build | 
- 					major >= 4 or: [
- 					major >= 3 and: [minor >= 8 and: [build >= 7]]]].
- 	satisfiesVersion
- 		ifTrue: [keyValueIndex := 6]
- 		ifFalse: [keyValueIndex := 3]!

Item was removed:
- ----- Method: MacUnicodeInputInterpreter>>keyValueIndex (in category 'accessing') -----
- keyValueIndex
- 	^ keyValueIndex!

Item was removed:
- ----- Method: MacUnicodeInputInterpreter>>majorMinorBuildFrom:satisfies: (in category 'version check') -----
- majorMinorBuildFrom: aString satisfies: aBlock 
- 	| v |
- 	v := aString
- 				ifNil: [^ false].
- 	v := ((v copyAfter: $])
- 				findTokens: $ ) last findTokens: $..
- 	v size = 3
- 		ifFalse: [^ false].
- 	v := v
- 				collect: [:s | s initialIntegerOrNil
- 						ifNil: [^ false]].
- 	^ aBlock valueWithArguments: v asArray!

Item was changed:
  ----- Method: MacUnicodeInputInterpreter>>nextCharFrom:firstEvt: (in category 'keyboard') -----
  nextCharFrom: sensor firstEvt: evtBuf 
  	| keyValue mark |
+ 	keyValue := evtBuf at: 6.
- 	keyValue := evtBuf at: self keyValueIndex.
  	mark := self japaneseSpecialMark: keyValue.
  	mark notNil
  		ifTrue: [^ mark].
  	keyValue < 256
  		ifTrue: [^ (Character value: keyValue) squeakToIso].
  	"Smalltalk systemLanguage charsetClass charFromUnicode: keyValue."
  	^ Unicode value: keyValue!