fullDrawOn:

Draw the full Morphic structure on the given Canvas

geeMail:geeMailRectangle:

handlesMouseDown:

| localPt |

localPt _ (self transformFrom: self world) globalPointToLocal: evt cursorPoint.
submorphs do: [ :each | (each fullBounds containsPoint: localPt) ifTrue: [^false]].

mouseDown:

Handle a mouse down event.