[squeak-dev] The Trunk: Morphic-mt.1570.mcz

commits at source.squeak.org commits at source.squeak.org
Tue Oct 15 07:00:28 UTC 2019


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

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

Name: Morphic-mt.1570
Author: mt
Time: 15 October 2019, 9:00:19.256598 am
UUID: ec33cc76-8890-cf4f-9df3-b104c58907ca
Ancestors: Morphic-mt.1569

Complements Multilingual-mt.247.

=============== Diff against Morphic-mt.1569 ===============

Item was added:
+ ----- Method: HandMorph class>>compositionWindowManager (in category 'Multilingual-ImmPlugin') -----
+ compositionWindowManager
+ 	self flag: #ImmPlugin.
+ 	CompositionWindowManager ifNotNil: [^CompositionWindowManager].
+ 	Smalltalk platformName = 'Win32' 
+ 		ifTrue: [^CompositionWindowManager := ImmWin32 new].
+ 	(Smalltalk platformName = 'unix' 
+ 		and: [(Smalltalk windowSystemName) = 'X11']) 
+ 			ifTrue: [^CompositionWindowManager := ImmX11 new].
+ 	^CompositionWindowManager := ImmAbstractPlatform new!

Item was added:
+ ----- Method: HandMorph>>compositionWindowManager (in category 'Multilingual-ImmPlugin') -----
+ compositionWindowManager
+ 
+ 	self flag: #ImmPlugin.
+ 	^ self class compositionWindowManager.!

Item was added:
+ ----- Method: Morph>>preferredKeyboardBounds (in category 'Multilingual-ImmPlugin') -----
+ preferredKeyboardBounds
+ 
+ 	self flag: #ImmPlugin.
+ 	^ self bounds: self bounds in: self world.
+ !

Item was added:
+ ----- Method: Morph>>preferredKeyboardPosition (in category 'Multilingual-ImmPlugin') -----
+ preferredKeyboardPosition
+ 
+ 	self flag: #ImmPlugin.
+ 	^ (self bounds: self bounds in: self world) topLeft.
+ !

Item was changed:
+ ----- Method: TextMorph>>preferredKeyboardPosition (in category 'Multilingual-ImmPlugin') -----
- ----- Method: TextMorph>>preferredKeyboardPosition (in category 'editing') -----
  preferredKeyboardPosition
  	| default rects |
+ 	self flag: #ImmPlugin.
  	default := (self bounds: self bounds in: self world) topLeft.
  	paragraph
  		ifNil: [^ default].
  	rects := paragraph selectionRects.
  	rects size = 0
  		ifTrue: [^ default].
  	^ rects first bottomLeft!

Item was added:
+ ----- Method: TextMorphForEditView>>preferredKeyboardPosition (in category 'Multilingual-ImmPlugin') -----
+ preferredKeyboardPosition
+ 
+ 	| pos |
+ 	self flag: #ImmPlugin.
+ 	pos := super preferredKeyboardPosition.
+ 	^ pos + (self boundsInWorld) topLeft.
+ !



More information about the Squeak-dev mailing list