The Trunk: Morphic-tfel.1303.mcz

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

The Trunk: Morphic-tfel.1303.mcz

commits-2
Tim Felgentreff uploaded a new version of Morphic to project The Trunk:
http://source.squeak.org/trunk/Morphic-tfel.1303.mcz

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

Name: Morphic-tfel.1303
Author: tfel
Time: 30 August 2016, 6:55:39.577793 pm
UUID: 95624237-35b6-0440-b7a5-fba1489427d7
Ancestors: Morphic-tfel.1302

unhibernate FlapTabs when switching into a project in case they were hibernated

=============== Diff against Morphic-tfel.1302 ===============

Item was changed:
  ----- Method: PasteUpMorph>>installFlaps (in category 'world state') -----
  installFlaps
  "Get flaps installed within the bounds of the receiver"
 
  | localFlapTabs |
  Project current assureFlapIntegrity.
  self addGlobalFlaps.
  localFlapTabs := self localFlapTabs.
  localFlapTabs do: [:each | each visible: false].
 
  Preferences eToyFriendly ifTrue: [
  ProgressInitiationException display: 'Building Viewers...' translated
  during: [:bar |
  localFlapTabs keysAndValuesDo: [:i :each |
  each adaptToWorld.
  each visible: true.
+ each unhibernate.
  self displayWorld.
  bar value: i / self localFlapTabs size]].
  ] ifFalse: [
  localFlapTabs keysAndValuesDo: [:i :each |
  each adaptToWorld.
  each visible: true.
  self displayWorld]].
 
  self assureFlapTabsFitOnScreen.
  self bringTopmostsToFront!