'From etoys2.1 of 26 July 2007 [latest update: #1556] on 16 August 2007 at 10:06:47 pm'!
"Change Set:		evtRecorderItems-sw
Date:			17 August 2007
Author:			Scott Wallace

TRAC 2830:  Remove the old EventRecorder from the Objects catalog.

Also Correct the spelling of 'button' in an EventRecorder prompt.
"!


!EventRecorderMorph methodsFor: 'commands' stamp: 'sw 8/14/2007 18:47'!
createPlayButton
	"Make a simple button interface for replay only"

	| butnCaption erm |
	butnCaption _ FillInTheBlank request: 'Caption for this button?' translated initialAnswer: 'play' translated.
	butnCaption isEmpty ifTrue: [^ self].
	erm _ (EventRecorderMorph basicNew
				caption: butnCaption
				voiceRecorder: voiceRecorder copy
				tape: tape) initialize.
	self world primaryHand attachMorph: erm! !


!EventRecorderMorph class methodsFor: 'parts bin' stamp: 'sw 8/14/2007 18:50'!
formerDescriptionForPartsBin
	"Answer  a description for use in a parts bin... formerly, that is."

	^ self partName: 'Event Recorder' translatedNoop
		categories: {'Multimedia' translatedNoop}
		documentation: 'Lets you record and play back interactions' translatedNoop! !

EventRecorderMorph class removeSelector: #descriptionForPartsBin!