[squeak-dev] The Trunk: Collections-cmm.805.mcz

commits at source.squeak.org commits at source.squeak.org
Fri Sep 7 19:51:18 UTC 2018


Chris Muller uploaded a new version of Collections to project The Trunk:
http://source.squeak.org/trunk/Collections-cmm.805.mcz

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

Name: Collections-cmm.805
Author: cmm
Time: 31 August 2018, 5:57:40.555042 pm
UUID: 7c024534-7188-47c5-b5e8-41e6dccf91ea
Ancestors: Collections-eem.804

Goes with Morphic-cmm.1461 to provide access to TextIndent attributes from the alignment menu.

=============== Diff against Collections-eem.804 ===============

Item was added:
+ ----- Method: Text>>indentationAmountAt: (in category 'attributes') -----
+ indentationAmountAt: anInterval 
+ 	anInterval do:
+ 		[ : position | self
+ 			attributesAt: position
+ 			do: [ : attr | attr isTextIndent ifTrue: [ ^ attr amount ] ] ].
+ 	^ 0!

Item was changed:
  ----- Method: TextAlignment>>dominates: (in category 'testing') -----
  dominates: other
+ 	"Alignment dominates other alignments or indentations."
+ 	^ other isTextAlignment or: [ other isTextIndent ]!
- 	"There can be only one..."
- 	^self class == other class!

Item was added:
+ ----- Method: TextAlignment>>isTextAlignment (in category 'testing') -----
+ isTextAlignment
+ 	^ true!

Item was added:
+ ----- Method: TextAttribute>>isTextAlignment (in category 'testing') -----
+ isTextAlignment
+ 	^ false!

Item was added:
+ ----- Method: TextAttribute>>isTextIndent (in category 'testing') -----
+ isTextIndent
+ 	^ false!

Item was changed:
  ----- Method: TextIndent>>dominates: (in category 'condensing') -----
+ dominates: aTextAttribute
+ 	"Indentation should replace any existing alignment or indentation."
+ 	^ aTextAttribute isTextIndent
+ 		or: [ aTextAttribute isTextAlignment ]!
- dominates: anAttribute
- 	^(self class == anAttribute class)!

Item was added:
+ ----- Method: TextIndent>>isTextIndent (in category 'testing') -----
+ isTextIndent
+ 	^ true!



More information about the Squeak-dev mailing list