Nicolas Cellier uploaded a new version of Graphics to project The Trunk:
http://source.squeak.org/trunk/Graphics-nice.276.mcz==================== Summary ====================
Name: Graphics-nice.276
Author: nice
Time: 26 October 2013, 11:25:28.113 pm
UUID: b79b81d3-ac64-41ba-8eed-2d1104425af4
Ancestors: Graphics-ul.275
Deprecate unused methods from BitBlt 'text display' protocol.
Collapse windows in preamble, expand them back in postscript.
This is in order to avoid text morph display in the middle of the update.
=============== Diff against Graphics-ul.275 ===============
Item was added:
+ (PackageInfo named: 'Graphics') preamble: '"below, add code to be run before the loading of this package"
+
+ "Remember which windows were not collapsed, and collapse them.
+ The goal is to freeze text morph display during this update.
+ This is required because displaying may fail and let the system in unusable state."
+ (Smalltalk globals
+ at: #''_windows_which_were_not_collapsed''
+ put: (World submorphsSatisfying: [:e | (e isKindOf: SystemWindow)
+ and: [e isCollapsed not]]))
+ do: [:e | e collapse].
+ '!
Item was removed:
- ----- Method: BitBlt>>displayString:from:to:at:kern:baselineY:font: (in category 'text display') -----
- displayString: aString from: startIndex to: stopIndex at: aPoint kern: kernDelta baselineY: baselineY font: aFont
- "Double dispatch into the font. This method is present so that other-than-bitblt entities can be used by CharacterScanner and friends to display text."
- ^ aFont displayString: aString on: self from: startIndex to: stopIndex at: aPoint kern: kernDelta baselineY: baselineY!
Item was removed:
- ----- Method: BitBlt>>displayString:from:to:at:kern:font: (in category 'text display') -----
- displayString: aString from: startIndex to: stopIndex at: aPoint kern: kernDelta font: aFont
- "Double dispatch into the font. This method is present so that other-than-bitblt entities can be used by CharacterScanner and friends to display text."
- ^ aFont displayString: aString on: self from: startIndex to: stopIndex at: aPoint kern: kernDelta!
Item was removed:
- ----- Method: BitBlt>>installFont:foregroundColor:backgroundColor: (in category 'text display') -----
- installFont: aFont foregroundColor: foregroundColor backgroundColor: backgroundColor
- "Double dispatch into the font. This method is present so that other-than-bitblt entities can be used by CharacterScanner and friends to display text."
- ^aFont installOn: self foregroundColor: foregroundColor backgroundColor: backgroundColor!
Item was changed:
(PackageInfo named: 'Graphics') postscript: '"below, add code to be run after the loading of this package"
+
+ "Restore the collapsed window that were not"
+ (Smalltalk globals removeKey: #''_windows_which_were_not_collapsed'')
+ reverseDo: [:e | e expand].'!
- "Migrate the actual preference values to the new pragma preferences."
- BitBlt classPool
- at: #SubPixelRenderFonts put: Preferences subPixelRenderFonts;
- at: #SubPixelRenderColorFonts put: Preferences subPixelRenderColorFonts'!
Locked
