The Trunk: MorphicExtras-tfel.194.mcz

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

The Trunk: MorphicExtras-tfel.194.mcz

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

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

Name: MorphicExtras-tfel.194
Author: tfel
Time: 30 August 2016, 6:57:05.056793 pm
UUID: 16e1e153-f298-0c42-84b0-11e192cec7aa
Ancestors: MorphicExtras-tfel.193

fix test in ViewerFlapTab>>unhibernate to actually test a boolean

=============== Diff against MorphicExtras-tfel.193 ===============

Item was changed:
  ----- Method: ViewerFlapTab>>unhibernate (in category 'transition') -----
  unhibernate
  "recreate my viewer"
 
  | wasShowing viewer |
+ referent ifNotNil: [referent isViewer ifTrue: [^self]].
- referent ifNotNil: [(referent isViewer) ifNotNil: [^self]].
  wasShowing := flapShowing.
  "guard against not-quite-player-players"
  viewer := ((scriptedPlayer respondsTo: #costume)
  and: [scriptedPlayer costume isMorph])
  ifTrue: [self presenter viewMorph: scriptedPlayer costume]
  ifFalse: [self presenter viewObjectDirectly: scriptedPlayer].
  wasShowing ifFalse: [self hideFlap].
  ^viewer!