David T. Lewis uploaded a new version of GetText to project The Trunk:
http://source.squeak.org/trunk/GetText-dtl.43.mcz==================== Summary ====================
Name: GetText-dtl.43
Author: dtl
Time: 14 November 2017, 10:50:26.259467 pm
UUID: 3de4bc20-be7d-4303-8a28-46be0055b23a
Ancestors: GetText-ul.42
Remove unnecessary references to global World.
=============== Diff against GetText-ul.42 ===============
Item was changed:
----- Method: LanguageEditor class>>ensureVisibilityOfWindow: (in category 'private') -----
ensureVisibilityOfWindow: aWindow
"private - activate the window"
+ | world |
+ world := Project current world.
- | |
aWindow expand.
aWindow comeToFront.
""
aWindow
+ right: (aWindow right min: world right).
- right: (aWindow right min: World right).
aWindow
+ bottom: (aWindow bottom min: world bottom).
- bottom: (aWindow bottom min: World bottom).
aWindow
+ left: (aWindow left max: world left).
- left: (aWindow left max: World left).
aWindow
+ top: (aWindow top max: world top).
- top: (aWindow top max: World top).
""
aWindow flash; flash!
Item was changed:
----- Method: LanguageEditor class>>openOn: (in category 'instance creation') -----
openOn: aLanguage
"open an instance on aLanguage"
| editor |
+ Project current world submorphs
- World submorphs
do: [:each | ""
((each isKindOf: LanguageEditor)
and: [each translator == aLanguage])
ifTrue: [""
self ensureVisibilityOfWindow: each.
^ self]].
""
editor := self on: aLanguage.
editor ifNotNil:[^editor openInWorld]!