applescript: how to make a simple shape?

[Timothy Bates]

hi all,
Anyone know the syntax for applescripting the creation of simple shapes?

rectangle is the default: how do i make a circle?

shapes have names, but that is not a property.


tell front document of application "OmniGraffle Professional"
	tell front canvas
		make new shape at beginning of graphics with properties {{origin: 
{20, 20}, size:{100,100}}
	end tell
end tell

tim