The Trunk: EToys-mt.360.mcz

Previous Topic Next Topic
 
classic Classic list List threaded Threaded
1 message Options
Reply | Threaded
Open this post in threaded view
|

The Trunk: EToys-mt.360.mcz

commits-2
Marcel Taeumel uploaded a new version of EToys to project The Trunk:
http://source.squeak.org/trunk/EToys-mt.360.mcz

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

Name: EToys-mt.360
Author: mt
Time: 8 October 2019, 5:01:11.761299 pm
UUID: f1ed44c8-54aa-7344-883e-e0fa72c60a02
Ancestors: EToys-mt.359

Complements Morphic-mt.1560

=============== Diff against EToys-mt.359 ===============

Item was changed:
  ----- Method: MethodMorph>>showScrollBar (in category 'scrolling') -----
  showScrollBar
  "Copied down and modified to get rid of the ruinous comeToFront of the inherited version."
 
  | scriptor |
  (submorphs includes: scrollBar)
  ifTrue: [^ self].
  self vResizeScrollBar.
  self privateAddMorph: scrollBar atIndex: 1.
  retractableScrollBar
  ifTrue:
  ["Bring the pane to the front so that it is fully visible"
  "self comeToFront. -- thanks but no thanks"
  (scriptor := self ownerThatIsA: ScriptEditorMorph)
  ifNotNil:
  [scriptor comeToFront]]
+ ifFalse: [self layoutChanged]!
- ifFalse: [self resetExtent]!