[Pkg] The Trunk: Graphics-nice.90.mcz

commits at source.squeak.org commits at source.squeak.org
Tue Nov 17 02:31:14 UTC 2009


Nicolas Cellier uploaded a new version of Graphics to project The Trunk:
http://source.squeak.org/trunk/Graphics-nice.90.mcz

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

Name: Graphics-nice.90
Author: nice
Time: 17 November 2009, 3:30:39 am
UUID: 595e07ad-cc77-4466-a7e0-4f897ad5a2f0
Ancestors: Graphics-nice.89

Cosmetic changes from Cuis: avoid using == Justified
This is an Integer and should be compared using =

=============== Diff against Graphics-nice.89 ===============

Item was changed:
  ----- Method: CharacterScanner>>plainTab (in category 'scanning') -----
  plainTab
  	"This is the basic method of adjusting destX for a tab."
+ 	destX := (alignment = Justified and: [self leadingTab not])
- 	destX := (alignment == Justified and: [self leadingTab not])
  		ifTrue:		"embedded tabs in justified text are weird"
  			[destX + (textStyle tabWidth - (line justifiedTabDeltaFor: spaceCount)) max: destX]
  		ifFalse: 
  			[textStyle nextTabXFrom: destX
  				leftMargin: leftMargin
  				rightMargin: rightMargin]!

Item was changed:
  ----- Method: CharacterBlockScanner>>tab (in category 'stop conditions') -----
  tab
  	| currentX |
+ 	currentX := (alignment = Justified and: [self leadingTab not])
- 	currentX := (alignment == Justified and: [self leadingTab not])
  		ifTrue:		"imbedded tabs in justified text are weird"
  			[destX + (textStyle tabWidth - (line justifiedTabDeltaFor: spaceCount)) max: destX]
  		ifFalse:
  			[textStyle
  				nextTabXFrom: destX
  				leftMargin: leftMargin
  				rightMargin: rightMargin].
  	lastSpaceOrTabExtent := lastCharacterExtent copy.
  	self lastSpaceOrTabExtentSetX: (currentX - destX max: 0).
  	currentX >= characterPoint x
  		ifTrue: 
  			[lastCharacterExtent := lastSpaceOrTabExtent copy.
  			^ self crossedX].
  	destX := currentX.
  	lastIndex := lastIndex + 1.
  	^false!



More information about the Packages mailing list