Tim Felgentreff uploaded a new version of MorphicExtras to project The Trunk:
http://source.squeak.org/trunk/MorphicExtras-tfel.199.mcz==================== Summary ====================
Name: MorphicExtras-tfel.199
Author: tfel
Time: 27 September 2016, 2:55:01.185629 pm
UUID: 654861ec-a93d-7b42-b2bc-f57bdbc9647f
Ancestors: MorphicExtras-tfel.198
Force re-drawing of the main hand after the EventRecorder finishes
=============== Diff against MorphicExtras-tfel.198 ===============
Item was changed:
----- Method: EventRecorderMorph>>pauseIn: (in category 'pause/resume') -----
pauseIn: aWorld
"Suspend playing or recording, either as part of a stop command,
or as part of a project switch, after which it will be resumed."
self setStatusLight: #ready.
state = #play ifTrue:
[state := #suspendedPlay.
playHand halo ifNotNil: [playHand halo delete].
playHand delete.
aWorld removeHand: playHand.
+ aWorld firstHand showHardwareCursor: true.
playHand := nil].
state = #record ifTrue:
[state := #suspendedRecord.
recHand removeEventListener: self.
recHand := nil].
voiceRecorder ifNotNil:
[voiceRecorder pause.
startSoundEvent ifNotNil:
[startSoundEvent argument: voiceRecorder recordedSound.
voiceRecorder clearRecordedSound.
startSoundEvent := nil]].
!