The Trunk: Graphics-nice.90.mcz

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!