[squeak-dev] The Trunk: Multilingual-xw.283.mcz
commits at source.squeak.org
commits at source.squeak.org
Tue May 3 11:40:45 UTC 2022
Marcel Taeumel uploaded a new version of Multilingual to project The Trunk:
http://source.squeak.org/trunk/Multilingual-xw.283.mcz
==================== Summary ====================
Name: Multilingual-xw.283
Author: xw
Time: 3 May 2022, 4:05:10.27391 pm
UUID: 6e259051-8b8f-404e-bac7-33faa625e3b4
Ancestors: Multilingual-xw.282
Add MultiByteFileStream>>readOnlyCopy to respect converter configuration while copying
Fix https://github.com/squeak-smalltalk/squeak-object-memory/issues/16
=============== Diff against Multilingual-mt.281 ===============
Item was added:
+ ----- Method: MultiByteFileStream>>readOnlyCopy (in category 'read, write, position') -----
+ readOnlyCopy
+ |copy|
+ copy := super readOnlyCopy.
+ converter ifNotNil: [copy converter: converter].
+ ^ copy.!
Item was changed:
----- Method: SimplifiedChineseEnvironment class>>clipboardInterpreterClass (in category 'accessing') -----
clipboardInterpreterClass
| platformName |
platformName := Smalltalk platformName.
platformName = 'Win32' ifTrue:
+ [^UTF8ClipboardInterpreter].
- [^WinGB2312ClipboardInterpreter].
platformName = 'Mac OS' ifTrue:
[^((Smalltalk osVersion indexOf: $.) > 4 "i.e. not 9xx.n, but 10xx.n, 11xx.n etc")
ifTrue: [NoConversionClipboardInterpreter]
ifFalse: [WinGB2312ClipboardInterpreter]].
platformName = 'unix' ifTrue:
[^(ShiftJISTextConverter encodingNames includes: X11Encoding getEncoding)
ifTrue: [MacShiftJISClipboardInterpreter]
ifFalse: [NoConversionClipboardInterpreter]].
^NoConversionClipboardInterpreter!
Item was added:
+ ----- Method: SimplifiedChineseEnvironment class>>fileNameConverterClass (in category 'accessing') -----
+ fileNameConverterClass
+ | platformName |
+ platformName := Smalltalk platformName.
+ platformName = 'Win32' ifTrue:
+ [^UTF8TextConverter].
+ ^ self systemConverterClass!
Item was changed:
----- Method: SimplifiedChineseEnvironment class>>inputInterpreterClass (in category 'accessing') -----
inputInterpreterClass
| platformName |
platformName := Smalltalk platformName.
platformName = 'Win32' ifTrue:
+ [^UTF32CNInputInterpreter].
- [^WinGB2312InputInterpreter].
platformName = 'Mac OS' ifTrue:
[^((Smalltalk osVersion indexOf: $.) > 4 "i.e. not 9xx.n, but 10xx.n, 11xx.n etc")
ifTrue: [MacUnicodeInputInterpreter]
ifFalse: [WinGB2312InputInterpreter]].
^MacRomanInputInterpreter!
More information about the Squeak-dev
mailing list
|