No comment. Sorry.

	drawing
	areasRemainingToFill: wantsRoundedCorners

	geometry
	acquireBorderWidth: innerBounds

	initialization
	basicInitialize initialize

	menu
	addBorderStyleMenuItems:hand: changeBorderColor: changeBorderWidth:

	printing
	fullPrintOn:

	private
	setBorderWidth:borderColor: setColor:borderWidth:borderColor:

	accessing	top
	borderColor
	borderColor:
	borderInset
	borderRaised
	borderStyle Work around the borderWidth/borderColor pair
	borderStyle: Work around the borderWidth/borderColor pair
	borderWidth
	borderWidth:
	cornerStyle
	cornerStyle:
	couldHaveRoundedCorners subclases unhappy with rounded corners reimplement
	doesBevels To return true means that this object can show bevelled borders, and therefore can accept, eg, #raised or #inset as valid borderColors. Must be overridden by subclasses that do not support bevelled borders.
	hasTranslucentColor Answer true if this any of this morph is translucent but not transparent.
	toggleCornerRounding
	useRoundedCorners
	useSquareCorners

	drawing	top
	areasRemainingToFill: May be overridden by any subclasses with opaque regions
	wantsRoundedCorners Default response is simple, fast, and false. May be overridden to allow almost any morph to be rounded.

	geometry	top
	acquireBorderWidth: Gracefully acquire the new border width, keeping the interior area intact and not seeming to shift
	innerBounds Return the inner rectangle enclosed by the bounds of this morph excluding the space taken by its borders. For an unbordered morph, this is just its bounds.

	initialization	top
	basicInitialize Do basic generic initialization of the instance variables
	initialize

	menu	top
	addBorderStyleMenuItems:hand: Add border-style menu items
	changeBorderColor:
	changeBorderWidth:

	printing	top
	fullPrintOn:

	private	top
	setBorderWidth:borderColor:
	setColor:borderWidth:borderColor: