Marcel Taeumel uploaded a new version of Multilingual to project The Trunk:
http://source.squeak.org/trunk/Multilingual-mt.275.mcz

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

Name: Multilingual-mt.275
Author: mt
Time: 5 April 2022, 5:11:53.218013 pm
UUID: 78036f07-7964-4e69-bcd9-ef8a71100a67
Ancestors: Multilingual-mt.274

Fixes several Unicode input interpreters to consider third buffer position (i.e. ASCII) if the sixth is zero, which aligns with the implementation in UTF32InputInterpreter and UTF32JPInputInterpreter.

=============== Diff against Multilingual-mt.274 ===============

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

Item was changed:
  ----- Method: UTF32CNInputInterpreter>>nextCharFrom:firstEvt: (in category 'as yet unclassified') -----
  nextCharFrom: sensor firstEvt: evtBuf 
  	| keyValue |
  	keyValue := evtBuf at: 6.
+ 	keyValue = 0 ifTrue: [keyValue := evtBuf at: 3].
  	keyValue < 256
  		ifTrue: [^Character value: keyValue].
  	^ Character leadingChar: SimplifiedChineseEnvironment leadingChar code: keyValue!

Item was changed:
  ----- Method: UTF32GreekInputInterpreter>>nextCharFrom:firstEvt: (in category 'as yet unclassified') -----
  nextCharFrom: sensor firstEvt: evtBuf 
  	| keyValue |
  	keyValue := evtBuf at: 6.
+ 	keyValue = 0 ifTrue: [keyValue := evtBuf at: 3].
  	keyValue < 256
  		ifTrue: [^Character value: keyValue].
  	^ Character leadingChar: GreekEnvironment leadingChar code: keyValue!

Item was changed:
  ----- Method: UTF32NPInputInterpreter>>nextCharFrom:firstEvt: (in category 'all') -----
  nextCharFrom: sensor firstEvt: evtBuf 
  	| keyValue |
  	keyValue := evtBuf at: 6.
+ 	keyValue = 0 ifTrue: [keyValue := evtBuf at: 3].
  	keyValue < 256
  		ifTrue: [^Character value: keyValue].
  	^ Character leadingChar: NepaleseEnvironment leadingChar code: keyValue!

Item was changed:
  ----- Method: UTF32RussianInputInterpreter>>nextCharFrom:firstEvt: (in category 'keyboard') -----
  nextCharFrom: sensor firstEvt: evtBuf 
  	| keyValue |
  	keyValue := evtBuf at: 6.
+ 	keyValue = 0 ifTrue: [keyValue := evtBuf at: 3].
  	keyValue < 256
  		ifTrue: [^Character value: keyValue].
  	^ Character leadingChar: RussianEnvironment leadingChar code: keyValue!