[Pkg] The Trunk: Multilingual-mtf.132.mcz
commits at source.squeak.org
commits at source.squeak.org
Fri Dec 31 06:00:48 UTC 2010
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 at morphicOffset y) + (0 at 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!
More information about the Packages
mailing list