Scripter creation

Creating a scripter

The following example creates a new empty scripter: 

newScripter
	<gtExample>

	^ BlScripter new

Set an element to the scripter

Use BlScripter>>#element: element: anElement self setElement: anElement. rootStep privatePulseUntilReady to set an element. This will compute the layout and wait until all background tasks are completed. 

scripterWithElement
	<gtExample>
	| aScripter |

	aScripter := self newScripter.
	aScripter element: self containerWithRectangle.

	^ aScripter