'From etoys2.1 of 26 July 2007 [latest update: #1576] on 2 September 2007 at 5:06:35 am'!
"Change Set:		noAutoFlap-sw
Date:			31 August 2007
Author:			Scott Wallace

Stop automatically putting up help-flaps for recording-controls, event theatre, and event roll."!


!EventRecordingSpace methodsFor: 'initialization' stamp: 'sw 8/31/2007 16:59'!
justTornOffFromPartsBin
	"A notification that the receiver was just torn off from a supplies flap, objects catalogue, or other parts factory; intercept this message to put up a help flap, for example."

	"self putUpHelpFlap"! !


!EventRecordingSpace class methodsFor: 'instance creation' stamp: 'sw 8/31/2007 16:58'!
openCentered
	"Open up a new instance of the receiver, centered "

	| anInst |
	anInst := self new.
	anInst visible: false.
	anInst openInWorldOrWorldlet.
	anInst center:  anInst owner center.
	anInst show.
	"anInst putUpHelpFlap"
"
EventRecordingSpace open.
"! !


!EventRollMorph methodsFor: 'initialization' stamp: 'sw 8/31/2007 17:01'!
eventTheatre: anEventTheatre
	"Establish the eventTheatre for an EventRoll."

	eventTheatre := anEventTheatre.
	self acceptTape: anEventTheatre eventRecorder tape.

	"(ScriptingSystem assureFlapOfLabel: 'Event Roll' translated withContents: self helpString translated) hideFlap"

! !


!RecordingControls methodsFor: 'documentation' stamp: 'sw 8/31/2007 16:59'!
justTornOffFromPartsBin
	"A notification that the receiver was just torn off from a supplies flap, objects catalogue, or other parts factory; intercept this message to put up a help flap, for example."

	"self putUpHelpFlap"! !