Matthew Fulmer uploaded a new version of Multilingual to project The Trunk:
http://source.squeak.org/trunk/Multilingual-mtf.132.mcz==================== Summary ====================
Name: Multilingual-mtf.132
Author: mtf
Time: 31 December 2010, 12:59:03.371 am
UUID: 38e9d3a8-003d-7743-bf8b-8caae4a537ea
Ancestors: Multilingual-ul.131
added an override from tweak for putting tweak widgets in text
=============== Diff against Multilingual-ul.131 ===============
Item was changed:
----- Method: MultiDisplayScanner>>placeEmbeddedObject: (in category 'scanning') -----
placeEmbeddedObject: anchoredMorph
anchoredMorph relativeTextAnchorPosition ifNotNil:[
anchoredMorph position:
anchoredMorph relativeTextAnchorPosition +
(anchoredMorph owner textBounds origin x @ 0)
- (0@morphicOffset y) + (0@lineY).
^true
].
(super placeEmbeddedObject: anchoredMorph) ifFalse: [^ false].
+ (anchoredMorph isMorph or: [anchoredMorph isPrimitiveCostume]) ifTrue: [
- anchoredMorph isMorph ifTrue: [
anchoredMorph position: ((destX - anchoredMorph width)@lineY) - morphicOffset
] ifFalse: [
destY := lineY.
baselineY := lineY + anchoredMorph height..
runX := destX.
anchoredMorph
displayOn: bitBlt destForm
at: destX - anchoredMorph width @ destY
clippingBox: bitBlt clipRect
rule: Form blend
fillColor: Color white
].
^ true!